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MAINDEC S11 eDZRFBebeD PFI DATA TEST 


REPLACES DSOA 
AbSTRACT 


THF PFI DISK DATA TEST TS A SEPIES FF STATIC, ADDPESS AND DATA 
PELIABILITY POUTINES BHICH VERIFY TO THE USER THF DISK 

CONTROL (RF{1) AND DISK (RS11) APE OPERATING CORPECTLY, THIS 
TEST USED IN CONJUNCTION wITH THE RFI DISKLESS AND PF14 

MULTI DISK ASSUKFS THE USEP OF AN ERROR FREE SYSTE™, «HEN 

USFD IN ITS EWTIPETY, 


REQUIREMFNTS 
EQUIPMENT 


PpPei1 
RFi1 AND RSi1 


STOPPAGE 

DaTa TEST 

“MAIN BODY OF PROGRAM OCCUPTJES ALL OF MEYORY (My NI MUY 
REQUIRES 4K WORDS) THE #RITE AND READ BUFFERS FLOAT THRU 
MEMUPY, 


LUADING PROCEDURE 


METHOD OF LOADING BOTH STATIC AND DATA TEST TAPES 


PROGRA“ FORMAT ABSOLUTE 
A, VERIFY THE BOOT LOADER IS IN MEMORY, 
KR, SET SWITCH REGISTER EQUAL TO #500 
MEMORY SIZE @ 
4k 17 
Bk 37 
12k $7 
16K 77 
20K 117 
24K 137 
26K 157 
C. PEPRESS LOAD ADDRESS, 


D, DEPRESS START, 








PAINDEC $11 -DZRFB-b-D PFI DATA TEST PAGE 3 
PEPLACFS DSOA 
4, STARTING PROCEDUPE 
4.1 WORST CASE DISK TES! 
A) SET SWITCH REGISTER EQUAL TO 260 
®) PEPRESS LUAD ADDRESS 
C) SET SwITCH KEGISTERP FQUAL TU ZEKO 
D) DEPRESS START 
4,2 OPFRATOR INTERVENTION FOR DATA TEST ONLY, 
A) Se? SeITCH REGISTER EQUAL TO 200 
B) DEPRESS LUAD ADDRESS 
€C) SET SwITCH REGISTER EQUAL TO MODE OF OPERATION (REF, SECS,) 
PD) DEPRESS START, 
4.3 ADDRESS ENTKY POINTS FOR TEST ROUTINES 
600 JP ApT2 CHECK THAT WHEN A 
WORD IS WRITTEN IT 
DOES NOT ALTER ADJACENT 
WORDS 
604 JMP ADT3 WRITE EACH #wORD ADDR ON ITSELF AND 
PEAD BACK TO COMPAPE 
610 JP ADT4 TRACK SELECTION TEST 
614 JméP ADTS LOOK AHEAD TEST 
629 JMP SPIKAL SPIRAL TEST 
424 JMP XSPIRaL SPIRaL TEST EXTENSION 
630 JMP RANEX PANDOM ADDRESS, DATA AND 
WORD COUNT TEST 
634 JMP EXTMEN DISK EXT, MEMORY EXERCISER 
640 JMP PFT1 DISK ®RITE POWER FAIL TEST 
644 JMP PFT2 DISK #RITE CHECK POWER FAIL TEST 


Pi 
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PEPLACFS DSOA 


(4.3 CONT’D) 
@eCOMAINTENANCE ROUTINE Sees 


650 JMP SEL#C LUAD WORD CUUNT PEG, 
WITH SWITCH REGISTER 


694 Jvp SELCMA LOAD CUFRENT MEMORY ADDR 
REG, WITH SwITCH KEGISTER 


660 JMP SELDAF LUAD DISK ADDR, REGISTER 
WITH SWITCH REGISTER 


664 JMP SELDAE LOAD DISK ADDR, EXT, 
WITH SWITCH REGISTER 


670 JMP SELDAR LOAD DATA BUFFER RFGISTER 
WITh SWITCH REGISTER 


674 JMP “UVLK MOVE CONTENTS OF LOOK 
AHEAD REGISTER INTO DATA LIGHTS 


700 JMP SELDCS LOAD DISK CONTROL PFGISTER 
WITH SWITCH REGISTER 


704 JMP STAMP ENABLE FREAD AMPLIFIERS 
TO TRACK SELECTED 
5. OPERATING PROCEDURE 
5.1 CONTROL SwITCH SETTINGS 
PROGRA™ CONVERSATION « 


Sk15 SET ENTER PROGRAM CONVERSATION MODE 
PEF, SEC, 5,2 


ReSeT OPERATE WORSE CASE TEST ON ALL DPIVES 
BEGINNING AT DRIVE ZERO 
DELETE TYPEOUT 
Sk14 SET DELETE TYPEOUTS 
PESET REPORT MESSAGE 


HALT ON COMPLETION FLAG @ 
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(5.1 CONT*D) 
Sk13 Set HALT ON FLAG (READY) 


PESET EXECUTE NEXT OPERATION 


DELETE COMPARISIONS @ 

Sk12. SET DELETE DATA COMPARISONS 
a 
RESET COMPAKE DATA BUFFERS 


LOOP ON TEST 
SkK11 SET LOOP ON TEST 
RESET CONTINUE TO NEXT TEST 
HALT OW ERROP 
Sk10 SET HALT AFTER ERROR REPORT 
RESET CONTINUE AFTER ERROR REPORT 
FNTER INTEPRUPT BACKGROUND TEST @ 
Sk9 SET WAIT FOR INTERRUPTS USING WAIT INSTRUCTION 
RESET WATT FOR INTERRUPTS WT} BACKGROUND TEST 


LOOP OWN DISK ADDpESS @ 
SR®e SET LOOP ON DISK ADDRESS (SEFCIFIED BY WORD COUNT AND DAR) 
PESET CONTINUE TO NEXT DISK BUFFER AREA, 


SELECT TPACK FROM SK (DURING DYNAMIC TESTING) 
Sk? SET SELECT TRACK FROM SR 
PESET SELECT TRACK UNDER PROGRAM CONTROL 
TRACK SELECTION 
6 5 4 3 2 1 0 
SELECT ONE UF 177(8) TPACKS 


NOTES 


® SW TCH SETTING APPLICABLE ONLY 1{N DATA TEST 


Fl 
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REPLACES DSOA 
CONVERSATION MODF FOR PROGRAM PARAMETERS FOR LATA TEST UNLY 


IN THe PROGRAM CONVERSATION MUng THe OPERATUP CAN SPHCTPY 
AnY OKE OP ALL OF THE PROGRAM PARAMETERS, 


PROGRAY CONVERSATION 
DATA TEST ONLY? 


Tr THE UPERATOR ANSafR YES THE PROGRAM BILL FNTER ORLY 
THE DATA PORTION OF TEST, 


MULTL DK MONDE? 


“ULTI DISK MODE ITS A MODE IW THE PROGKAM wHICH ALLOnS THE 
OpFRATOR TO EXFCISF, ALL THE DIS¥S ON THF SYSTF¥ WITHOUT 
PEeSTARTING THE PROGRAM, THE PROGRAM AFTER FXEPCISING ONE 
DISK wILL PEPURPT A MESSAGE TELLING THE CPERATOR WHICH DISK 
WILL BE SELECTED NEXT, AND THEN THE PROGRAM WILL EXERCISE 
THAT DISK, WHEN A COMPLETE PASS IS ACCOMPLISHED, A PASS 
COMPLETE wILL BE REPORTED AND THE TEST WILL RECYCLE, 


TF THE UPERATUOR ANSWERS *YFS* TO THIS QUFSTION, HE WILL THEN 
BE ASKED HOW MANY DISKS ARE ON THE SYSTEM, AND THEN THE 
PRECFDING QUESTION sILL BE SKIPPEL, IF THF OPERATOR ANSWERS 
“nO TO THIS QUESTION, THE NEXT QUESTION WILL RE SKIPPED, AND 
HE wILL THFN BE ASKED WHICH DISK IS TO BE EXERCISED, 
¢ OF DFS 1 TO 10 OCTAL? X 
TYPE THE NUMBER OF DISKS ON THE SYSTEM, FOR MULTI DISK MODE. 
EX, DK? X 


WHEN NOT IN THE MULTI DISK MODE THE OPERATOR WILL HAVE TO 
SPECIFY WHAT DISK Is TO BE USED, 


OPT, WROD CNT? 


IF THE OPERATOR ANSWERS *NO* TO THIS QUESTION THE NEXT TWO 
QUFSTIONS WILL BE DELETED FROM THE CONVERSATION, 


LENGTH (1 TO 1000)? XXX 
THE OPERATOR CaW SPECIFY aNY LENGTH TRANSFER FROM 1(8) TO 
1000(8) WURDS, THE NORMAL TRANSFER LENGTH IS N(#) WORDS 
WHERE IS THE MAXIMUM BUFFER SIZE FORK THE AVAILABLE CORF, 

WRD ADDR? XXX 
THE OpFRATOR MUST NOW SPECIFY THE STARTING wORD ADDRESS-THIS 


BEING ONE OF 2048(10), ADDRESS ENTRY MUST BE MADE IN OCTAL 
(0 TO 3777(8)), 


G! 
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REPLACES DSOA 


(5.2 CONT°D) 
OPT, DATA PAT, 8? 


If NO OPTIOWAL DATA PATTFRN IS REQGUESTEL THE PRUGKAM wILL 
FXECUTE THE FOLLOWING LIST UF DATA PATTERNS, 


PATTFRN 0 = 000000 
td 1 = 177777 
i 2 = 134510 
1“ 3 = 043767 
sd 4 = 100000 
<3 5 = 107070 
ve 6 = 070707 
® 7 = 052525 
a 10 = 125252 
id 141 = 177737 
ad 12 = 004102 
d 13 = 136363 
- 14 = 063636 
= 15 = 000001 
- 16 = 100005 
od 17 s 000520 
° 20 = 030303 
° 21 s RANDOM DATA 
» 22 = RUN ALL DATA PATTERNS UNDER PROGRAM CONTROL 


IF THe OPERATOR DECIDES TO OPERATE UNDEk PROGRAM CONTROL, 
THE NEXT QUESTION WILL BE SKIPPED, THE OPERATOR BY 
PEQUESTING AN OPTIONAL DATA PATTERN HAS THE ABILITY OF 
SELECTING ANY ONE OF THE 21(6) DATA PATTERNS, DATA PATTFRN 
NO, XX 


DISK PROGRAM FUNCTION PARAMETERS 


Im THIS SECTION OF THE PROGRAM PARAMETER CONVERSATION MODE, 
THF OPERATOR CAN SELECT ANYONE OR ALL THREE OF THE CONTROL 
FUNCTIONS TU BE EXECUTED, THE NORMAL SEQUENCE OF DISK 
FUNCTIONS UNDER PROGRAM CONTROL IS WRITE, WRITE CHECK, AND 
THEN READ, BY ENTERING THE CONVERSATION MODE THE OPERATOR 
HAS GAINED COMPLETE CONTROL OVER THE DISK FUNCTIONS, HE 
MUST SPECIFY YFS OR NO TO ALL OF THE FOLLOWING QUESTIONS, 


WRITE? (YES © NO) 
WRITE CHECK? (YES © NO) 
READ? (YES © NO) 


MATNDPEC S11 °DZRFB-BeD PF11 DATA TEST PAGE 8 
PEPLACES DSOA 


(5.2 CONT*D) 


TO PERFOPM g ®RITE CHECK ONLY, THE OUPERZTUP MUST FIRST 
WRITE SOME KNOWN DATA ON THE DISK, THIS COUPSF OF ACTIUN 
ALSU PREVAILS FuR A READ ONLY OPERATION, 

© TF AN ERROP OCCUPS IN THE LINE THE OPERATOR TS TYPING, 
DEPRESS THE PURBeOUT, THIS CAUSES THE QUFSTION TO BE 
PETYPED AND ALLOWS THE OPERATOR TO PROPERLY ANSaFR THE 
QUFSTION, 


a INDICATES TO THE OUPERATUR THAT THE CARRIAGFeRETURN 
SHOULD BE TYPED AT THE INDICATED PLACt. TO TERMINATE 
THE LINE OF TYPED CHARACTERS, 


5.3 SUBROUTINE ABSTRACTS 
ADT2 © TEST FOR ALTEPATION OF WORD ADDRESS 


IN THIS ADDRESS TEST, THACK ZERO 1S LOADED wITH ALL ONES IN 
BLOCK OF 2K, THEN THE TEST STARTING WITH ADDRESS 0 AND PRO 
GRESSING UP THROUGH AND INCLUDING ADDRESS 3777(8), THE UCTAL 
VALUE OF THE ADDPESS, IS WRITTEN ON ITSELF AND ALL OTHER 
ALDPRESSES ARE CHECKED FOR MODIFICATION, THEY SHOULD EQUAL 

ALL ONES, AFTER CHECK 1s COMPLETED AND ALL ERRORS ARE REPORTED 
IF ANY, THE PUUTINE THEN REeWRITES THE ADDRESS WITH ALL OMFS 
AND THEN CONTINUES ON WITH THE NEXT ADDRESS, 


ADT3 © VERIFY THAT ALL ADDRESSES EXIST ON DISK SURFACE TRACK 


IN THIS ROUTINE THE OCTAL VALUF OF EACH ADDRESS IS sRITTEN ON 
ITSELF IN 2K wORD BLOCKS, THE ROUTINE THEN READS THE DISK AND 
VERIFIES THAT ALL ADDRESSES CAN RE ACCESSED, ERRORS MAY bE 
PEPORTED IN THIS TEST WHICH ARE NOT ADDPESS FRRORS BUT DATA 
ERPORS, THE OPERATOR IS CAUTIONED TO CAREFULLY EXAMINE THE 
ERPURS TO DISTINGUISH BETWEEN THE ADDRESS AND DATA ERPORS, 


ADT4 © TEST TRACK *X* AND “¥* MATRIX 


THIS ROUTINE WAS DFSIGNEN TO ENABLE THE OPERATOR AN EASY AND 
SURE METHOD OF DETECTING DEFECTIVE MATRIX SWITCHES, IN THIS 
POUTINE THE FIPST AND LAST LOCATION OF EACH TRACK (0 AND 3777(8)) 
ARE WRITTEN WITH ALL OWES, AFTER THE INITIAL WRITE HAS TAKEN 
PLACE, THE ROUTINE THEN STARTS WITH THE FIRST WORD OF THE ABOVE 
INDICATED LOCATION AND WRITES THE ADDRESS OW ITSELF, THE NEXT 
STEp OF THE ROUTINE Is TO CHECK ALL OTHER ADDRESSES TO SEE IF 
THFY HAVE BEEN ALTERED, AFTER ALL ERROFS HAVE BEEN REPORTED, 

IF ANY, THE ROUTINE REewRITES THE ADDRESS WITH ALL ONES AND 
CONTINUES ON WITH THE NEXT ADDRESS, 
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(5.3 CONT*’D) 
ALDTS © TEST LOOK AHEAD FEATURE 


THF DISK LOOK AHFAD FEATURE WAS DESIGNFL FOR THE USER &HO 
WANTED OPTIMUM USE OF THE DISK, BY KNOWING AT WHAT ADDRESS 
THF DISK READ HEADS ARE LOCATED AT ALL TIMES, THE ADDRESS 
LOADED INTO THE ADS REGISTER 1S THE PHYSICAL ANDRESS OF 
THE DISK, THE PROGRAM LOCATES THE PHYSICAL ADDRESS 

RY wRITE A wORD AND UPON RECEIVING THE COMPLETION FLAG THE 
PPOGPAM READS THE ADS REGISTER, THE ADDRESS MAY BE Up TO 
2 ADDRESSES OFF, 


SPIRAL © TEST DISK TPACK SPIRAL 


Th THIS ROUTINE THE ABILITY OF THE CONTFOL (RFO9/15) TO SPIRAL 
FrOM ONE TRACK TO ANOTHER DURING A READ AND A WRITE, IN ORDER 
TU CHECK THE READ SPIRAL, THE LAST ADDRESS (3777(6)) OF TRACK 
ZEPO IS WRITTEN WITH PRE@DETERMINED DATA AND THE FIPST ADDPESS 
(0) OF TRACK OWE, IS ALSO WRITTEN WITH FPRE@DETFRMINED DATA, 
THEN A TWO WORD PEAD STARTING AT LOCATION 3777(8) OF TRACK ZERO 
TS ACCOMPLISHED, THE TWO WORDS THEN ARE COMPARED TO THE DATA 
WRITTEN AND ANY ERPOPS ARE REPORTED, 


TO CHECK WRITE SPIRAL, THE ROUTINE WRITES TWO WORDS STARTING 

AT ADDRESS 3777(8) OF TRACK ZERO AND TERMINATES AT LOCATION 0 
OF TRACK ONE, THE KOUTINE THEN READS THE TwO LOCATIONS WITH 
ONE WORD TRANSFERS, AND VERIFIES THE CORRECT DATA WAS STOKED IN 
FACH LOCATION, 


DATA TESTS 
RANEX @ RANDOM DATA, RANDOY ADDRESS RANDOM #ORD COUNT TEST 


THIS ROUTINES TESTS THE ABILITY OF THE SYSTEM TO ACCESS RANDOM 
ADDRESS WITH RANDOM DATA AND AN INCREMENTAL WORD COUNT, THE 
DATA 1S FIRST WRITTEN ON THE DISK AND THEN DATA IS WRITE 
CHECKED, ALL ERRUPS APE REPORTED, THE WORD COUNT RUNS FROM 1} 
TO 1000(8) WORDS, 


DATA RELIABILITY © DATA PATTERN TEST 


IN THIS PORTION OF THE TEST, THE ABILITY OF THE COMPLETE DISK 
SURFACE TO WRITE, WRITE*°CHECK, AND READ DATA IS TESTED, THE 
ROUTINE FIRST WRITES THE COMPLETE SURFACE WITH A SET DATA 
PATTERN, THEN A WRITE CHECK OF THE COMPLETE SURFACE IS ACCUMe 
PLISHED, THUS REPORTING ALL ERRORS BETWEEN THE DATA WRITTEN 

AND THE DATA IN MEMORY, THREE READS ARE ACCOMPLISHED FOR FACH 
BUFFER AREA ON THE DISK, THE OPERATOR AT THIS POINT HAS SEVERAL 
OpTIONS AS TO WHAT COURSE OF ACTION THE PROGRAM WILL TAKE NEXT, 
CREF, SEC, 5.1) 
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PEPLACES DSOA 


(5.3 CONT’D) 


Tt THE DATA PELIABILITY, ALL PRUGRAM PARKAMFTFRS CAN PRE CHANGED, 
PEF, SEC. 5,2 


YAINTENANCE TOOL 
STAMP » STATIC TRACK SELECTION 


THIS ROUTINE WAS DESIGNED TO ENABLE THE OpFRATOR TO HAVE A QUICK 
METHOD OF SELECTING TKACKS FOR AMPLITUDE ADJUSTMENTS, 


STAMP © OPFRATING PROCEDURE 

STEP A, SET SWITCH REGISTER EQUAL TO 704 

STEP 8B, DEPRESS LOAD ADDRESS 

STFP C, SET SWITCH REGISTER 9 THRU 7 EGUAL TO DISK #0 THRU 7 
STFP D. DEPPESS START 

STFp E, SET SWITCH REGISTER 6 THRU 0 EQUAL TU TRACK 6 

STEP F, DEPRESS CONTINUE 


6 5 4 3 2 1 9 


TRACK NUMBER 
(O THRU 177(8)) 


STFP G, TRACK NUMBER CAN BE CHANGED ARBITRARILY, 


FRRUR REPORTS 

ADDRFSS ERROR 

XX EPR CNT XXXXXXWRDIXXXXWRD2 
FRPCNT s IS THE TaG FOR THE LISTING 
WRD] = WHAT WAS EXPECTED 

WRD2 zs WHAT WAS RECEIVED 


WHEN A REPORT ONLY CONTAINS ONE WORD THE PROGRAM WAS EXPECTING 
ZEROS BUT RECEIVED WHAT WAS REPORTED, 


Kl 
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6,2 FRPOR REPORTS 
STATUS ERROR 
STATUS ERKOP XXDAE XXXXXYDAR XXXXKXXDCS 
A A c 


AsTHE DISK NUMBER AND EXTENDED DISK ADDRESS BITS, 
BsTHE DISK ADDRESS REGISTER 
CsTHE DISK CONTROL REGISTER 


LAYOUT OF DISK ADDRESS BITS 
DAE DAR 
MXM MAK ARAM RAK MAM MAK MAK 


DISK NG, TRACK ADDRESS WORD ADDKFSS 


BIT LAYOUT OF DCS REGISTER 
BITiSs ERROR 
BITi4d=s DISK FREEZE 
BITi3= WRITE CHECK ERROR 
BITi2s DATA PARITY EPROK 
BITiis NON-EXISTENT DISK 
BIT1IO# WRITE LOCKOUT 
BIT9s MISSED TRANSFER 
BIT@s DISK CLEAR 
bIT?s READY 
BIT6s INTERRUPT ENABLE 
BITSs EXTENDED MEWORY 4 (XM1) 
BIT4s EXTENDED MEMORY 0 (XMO0) 
BIT3s MAINTENANCE 
BIT2eis FUNCTION REGISTER 


BIT 2 BIT 1 OPERATION 
0 0 NOP 
i 0 READ 
0 1 WRITE 
i i WRITE CHECK 


IF THE ERROR OCCURRED WHEN READING THE PROGRAM WILL REPORT 
WHICH READ, 
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PEPLACES DSOA 


(6.2 CONT*D) 


6.4 


NOTE: wHEN A FREEZE ERROR OCCURS AN ADDITIONAL FRROR “MESSAGE 


WILL BE REPORTED, AS FOLLOWS: 
XXX HRD ERR 
LAYOUT OF BITS 0 = 7 
BITO® CMa INH. (NUT AK ERROK CONDITION) 
BITis UNUSED 
RIT2Zs NONCEXISTENT MEMORY FRROR 
BIT3se UNUSED 
BIT4s TRACK C TIMING ERROR 
BITSe# TRACK B TIMING ERROP 
BITos TRACK A TIMING ERROR 
BIT7s ADDRESS PARITY ERROR 
DATA ERRORS 
DATA ERR 1 READ XXDAE MXXXXXDAR XXXXXXGL DATA XXXXXXBD DATA 
A A _f 1) E 
AsWHICH PEAD THE ERROR OCCURRED 
BaTHE DISK NUMBER AND EXTENDED DISK ADDRESS BITS 
CaTHE DISK ADDRESS REGISTER 
DsTHE DATA WRITTEN OWN THE DISK 
EsTHE DATA READ FROM THE DISK 
PANEX ERRORS 


FRRORS WHICH OCCUR IN RANEX ALSO HAVE The WORD COUNT REPORT 
WITH THE ERROR MESSAGE IN THE FOLLOWING MANNER, 


PANEX ERR XXDAE XXXXXXDAR XXXXWRD CNT, 
A B ¢c 
AsSTARTING DAE OF TRANSFER 
BsSTARTING DAR OF TRANSFER 
CsewWORD COUNT OF TRANSFER 
OVERFLOW ERROR 


WHEN THe DISK TRANSFERS MORE WORDS THEN ITS WORD COUNT wAS 
EQUAL TO, THE PROGRAM FLAGS IT, 


FXTRA BKS XXXXXX WRD ADDR XXXXXX BD DATA 


AsTHE LOCATION IN MEMORY WHERE THE DATA WAS TRANSFERRED 


BsTHE DATA THAT WAS TKANSFERRED 


Mi 
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6,6 


6.8 


REPLACES DPSOA 


DISK ANDDPESS ERROR 

DK ADDR FRR XYXDAFXXAXXYDAR 
THE TERMINATING DISK ADDRESS AFTER THE TRANSFER WAS “UT CURRECT 
THE DAE AND DAP SHOULD EQUAL #HAT WAS PEPURTED, CHECK THE F114 
PANEL FOR THF ERROR ADPPFSS, 
PROCESSOR TIVE OUT 

CPU BKGRND TIMED OUT 


THIS MESSAGE WILL BE KFPORTED IF THE DIS*® FATLS TO RAISE A 
KR RFQUEST AFTFR EXTENDED PERIOD OF TIME, 


Fit 
FRD 


THIS MFSSAGE IS RFPURTFD AT THE FND OF UNE COMPLETF PASS UF 
THE DISK SYSTEM, 


“EMOPY PARITY FRROR 

THIS MFSSAGE 1S REPOPTFD 1F T,E PROGRAM TETECTS A PAPYTY 
FRKROR DUPING PRUGPAM EXECUTION, 

POWEP HAS FAILED 


THIS MESSAGE INDICATES THAT THE POWER HAS FAILED AND THE 
TEST RESTORED, 
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REPLACES DSUA 


MISCELLANEOUS 


IN SOME ADDRESS TESTS THE PROGRAM DEPENS ON WRITTING AND 
READING DATA CORRECTLY FROM THE DISK,AND IF IT DOES NOT IT MAY 
PEPORT AN ADDRESS FAILURE, WHEN IN FACT IT WAS A DATA FAILURE, 


SUGGESTED POWER FAIL TEST 


THIS TEST 1S SUGGESTED SO THAT THE ABILITY OF THE DISK TO RETAIN 
DATA AFTER A POWER FAILURE HAS OCCURRED MAY BE TESTED, 


FOLLOW THESE STEPS IF NO ERROR OCCURS, ONE PASS SHOULD BE 


SUFFICTENTs 

A) LOAD AND START PFT1 

AR) UPON RECFIVING "OK" FROM THE PROGRA” TURN OFF THE POWER 
TO THE MACHINE AND THEN BACK ON AGAIN, 

C) THERE SHOULD BE AT MOST ONE ERROR, ANY MORE IS CONSIDERED 
UNRELIABLE, 

D) PERFORM THE SAME STEPS WITH PFT2, THIS TIME THERE SHOULD 


BE NO ERRORS, 


2 
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DZRFBB,P11 
i 
ae eTITLE MAINDEC*11°DZRFB<B RF11 DATA TEST REPLACES DSOA 

; 

5 sCOPYRIGHT 1973, DIGITAL FQUIPMENT CORP,, MAYNARD, MASS, 
6 sPROGRAM BY E, HAIGHT/C, CASWELL 

7 ,ENABL ABS 

q 

9 

10 000001 BITOs1 

11 000002 BITi#2 

12 000004 BIT2s4 

13 000010 BIT3#10 

14 000020 BIT4#20 

15 000040 BITS#40 

16 000100 BIT62100 ~*~, 

17 000200 BIT7#200 

18 000400 BIT@#400 

19 001000 BIT9#1000 
20 002000 BIT10#2000 
21 004000 BIT1124000 

22 010000 B1T12#10000 

23 020000 BIT13#20000 
24 040000 BIT14240000 

25 100000 BIT15#100000 

26 4 

27 ’ . 
28 i 
29 104403 WRITESTRAP?3 

30 104407 WRCHECKSTRAP SO? 

31 104405 READsTRAP oS 

32 

33 000000 ~20 #TRAP CATCHER 0 © 776 
34 000020 2320 

35 000020 011052 XWaIT #BACKGROUND TEST VECTOR 
36 000022 000000 0 

37 000024 011376 DOWN sPOWER FAIL 

38 000026 000340 340 

39 000030 2230 
40 000030 012464 EMTRP sTTY VECTOR 
41 000032 000340 340 
42 000034 006344 DISK sDISK CALLING VECTOR 
43 000036 000340 340 
44 
45 000200 22200 

46 000200 000167 000712 JMP START 

47 000204 006436 DKINT DISK INTERRUPT VECTOR 
48 000206 000200 200 sDISK PRIORITY 

49 
eee STATIC ROUTINES 
51 ; 000300 22300 


—_—_ SSS ei 
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52 

53 

$4 000600 22600 

$5 000600 000167 001344 JMP ADT2 sCHECK THAT WHEN A 

56 sWORKD IS WRITTEN IT 

$7 sDOES NOT ALTER ADJACENT 

58 swORDS 

59 g 

60 3 

61 000604 000167 002204 JMP ADT3 WRITE EACH WORD ADDR ON ITSELF AND 

62 sREAD BACK TO COMPARE 

63 3 

64 ] 

65 000610 000167 002554 JMP ADT4 sTRACK SELECTION TEST 

66 , 

67 ? 

68 000614 000167 003176 JMP ADTS LOOK AHEAD TEST 

69 ? 

70 , 

71 000620 000167 003406 JMP SPIRAL SPIRAL TEST 

72 i] 

73 3 

74 000624 000167 003752 JMP XSPIRAL sSPIRAL TEST EXTENSION 

75 3 

76 i] 

77 000630 000167 004730 JMP RANEX SRANDOM ADDRESS, DATA AWD 

78 WORD COUNT TEST 

79 , 

80 3 

81 000634 000167 007774 JMP EXTMEN SWRITE/WRITE CHECK DISK WITH 

82 sEXTENDED MEMORY 

83 3 

a4 ] 

85 000640 000167 010340 JMP - PFT sDISK WRITE POWER FAIL TEST 

86 3 

67 3 

68 000644 000167 010572 JMP PFT2 sDISK WRITF CHECK POWER FAIL TEST 

ag ] 

90 t 

91 JSCOMAINTENANCE ROUTINES@o® 

92 ] 

93 3 

94 000650 000167 011130 JMP SELWC sLOAD WORD COUNT REG, 

95 sWITH SWITCH REGISTER 

96 e 

97 ’ 

98 000654 000167 011134 JMP SELCMA LOAD CURRENT MEMORY ADDR 

99 sREG, WITH SWITCH REGISTER 

100 ’ 

101 ’ 

102 000660 000167 011140 JMP SELDAR sLOAD DISK ADDR, REGISTER 


103 s@ITH SWITCH REGISTER 
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106 000664 000167 


107 
108 
109 
110 
iii 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 
141 


000670 


000674 


000700 


000704 


000167 


000167 


000167 


000167 


RF11 DATA TEST REPLACES DSOA 


011144 


011154 


JMP 


JMP 


JMP 


JMP 


JMP 


sRF11 DATA TEST 


MACY11,624 


SELDAE 


SELDBR 


MOVLK 


SELDCS 


STAMP 


sVECTORS USED IN PROGRAM 
$01 LOC 204 DISK INTERRUPT 


982 LOC 30 EMT (TELETYPE OUTPUT) 
993 LOC 34 TRAP (DISK HANDLERS) 


6°SEP*73 14:33 PAGE 3 


sLOAD DISK ADDR. EXT, 
+WITH SwITCH REGISTER 
3 


8 

#LOAD DATA BUFFER REGISTER 
sWITH SWITCH REGISTER 

U 


5 

sMOVE CONTENTS OF LOOK 

pAHEAD REGISTER INTO DATA LIGHTS 
U 


, 

sLOAD DISK CONTROL REGISTER 
sWITH SWITCH REGISTER 

i 


’ 

sENABLE READ AMPLIFIERS 
#TO TRACK SELECTED 
sFROM SWITCH REGISTER 

’ 

, 


904 LOC 14 TRACE TRAP (USED IN BACKGROUND TEST) 
905 LOC 20 IOT TRAP (USED IN CALLING BACKGROUND TEST) 


er 


— 


MAINDECe11°DZRF BoB 
OZRFBB,P11i 


001000 
001002 
001004 
001006 
001010 
001012 


001014 
001016 
001020 
001022 
001024 
001026 
001030 
001032 
001034 
001036 
001040 


001042 
001044 
001046 
001050 
001052 
001054 
001056 
001060 
001062 
001064 
001066 
001070 
001072 
001074 
001076 
001100 
001102 
001104 


177570 
177776 
177566 
177562 
177564 
177560 


177460 
177462 
177464 
177466 
177470 
177472 
177474 
177476 
000204 
000206 
000200 


000000 
146723 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 


RF11 DATA TEST REPLACES DSOA MACY11,624 G6-SEP-73 14333 PAGE 4 


EVEN 


3 

41/0 ADDRESS POINTERS 
SWR: 177570 

PS3 177776 

TPB: 177566 

TKB: 177562 

TPS: 177564 

TKS: 177560 


g 
sDISK 1/0 REGISTERS 


U 

DCSt 177460 
WCs 177462 
CMAS 177464 
DAR? 177466 
DAE: 177470 
DBR: 177472 
MAS 177474 
ADS: 177476 
VECTOR: 204 
STATUS: 206 
PRIORITY :BIT? 


sSWITCH REGIISTER 
*PROCESSOR STATUS REGISTER 
STELETYPE REGISTERS 


sDISK CONTROL REGISTER 
swORD COUNT REGISTER 
sSCURRENT ADDRESS REGISTER 


sLOWER 16 BITS OF DISK ADDRESS 


sEXTENSION ADDRESS REGISTER 
sDATA BUFFER REGISTER 
+MAINTENANCE REGISTER 

sLOOK AHEAD REGISTER 
sINTERRUPT VECTOR ADDRESS 
sDISK INTERRUPT STATUS 
sDISK PRIORITY LEVEL 


sRF11 DEDICATE REGISTERS (MEMORY) 


U 

FLAG: 0 
RANNUS 
WROCT? 
TRACKS 
DMA: 
PATNUs 
BUF 8 
TWROCT?s 
TOMAS 
SWROCT: 
ERCOUNTS 
SAVE: 
SAV1is 
PASS: 
DSKNOR? 
HRDERs 
PASSC:s 
INPUT? 


~ 
cas 
oa 
od 
LS) 
les 


3 
sRF11 WORK REGISTERS 


sINTERNAL PROGRAM FLAG 
sRANDOM NUMBER PRIME 
sWORKING WORD COUNT 
sWORKING DAE 

swORKING DAR 

sDATA PATTERN INDEX 
sWORKING DATA BUFFER (OUT-IN) 
sTEMP WORD COUNT 

sTEMP DAR 

sSTANDARD WORD COUNT 
sERROR COUNT FOR MESSAGES, 


sPOINTER FOR HARD ERROR 





cae 





MAINDEC©11°DZRFBoB 
OZRFBB,PI1 


196 
197 
196 
199 
200 


001106 
001110 
001112 
001114 


RF1ii DATA TEST REPLACES DSOA 


MACY11,.624 6-SEP-73 


s(CAN BE CHANGED IN ANY ROUTINE) 


WORK? 

WORKI3 
WORK2: 
WORK33 


14:33 PAGE 5 


MATNDEC?11°DZRFB°B 
DOZRFBB,P11 


201 
202 
203 
204 
205 
206 
207 
208 
209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 


001116 
001120 
001126 
001132 
001134 
001140 
001142 
001146 
001154 
001160 
001164 
001170 
001174 
001202 
001210 
001214 
001220 
001222 
001230 
001234 
001242 
001244 
001252 
001254 
001262 
001270 
001272 
001276 
001300 
001302 
001304 
001306 
001312 
001314 
001316 
001320 
001322 
001324 
001326 
001330 
001336 
001344 
001350 
001354 
001362 
001366 


001372 
001374 
001376 
001402 
001410 
001412 


000005 
012767 
012700 
005020 
005367 
001372 
012706 
012777 
005067 
005067 
005067 
005067 
012767 
016767 
004767 
005777 
100464 
052767 
005067 
032777 
001013 
022767 
001407 
062767 
062777 
000761 
005767 
001003 
104001 
014417 
000000 
004567 
013446 
014444 
000001 
104000 
013534 
014444 
177777 
016767 
162767 
006167 
006167 
052767 
005077 
000167 


104001 
014062 
004767 
022767 
001003 
052767 


RF11 DATA TEST REPLACES DSOA 


000010 
013426 


177746 


001000 
000340 
177662 
177664 
177662 
177660 
000400 
177656 
012012 
177560 


070000 
012212 
004000 


012150 


012112 
000001 
177526 
177522 
004000 
177436 
000464 


177760 


177626 


177662 
177636 


177612 
177552 
012174 


012164 
177534 


177540 
177532 


177460 


012036 
177422 


STARTS 
CLRTABS 


SPECOR: 


RCNODV: 


REPDRV: 


sENTER OPERATOR 


CONMs 


RESET 
MOV 
MOV 
CLR 
DEC 
BNE 
MOV 
MOV 
CLR 
CLR 
CLR 
CLR 
MOV 
“ov 
JSR 
TST 
BMI 
BIS 
CLR 
BIT 
BNE 
CMP 
BEOQ 
ADD 
ADD 
BR 
TST 
BNE 
EMTo1 
NODRV 
HALT 
JSR 
TEXBUF 
RKNUM 
i 
EMTsO 
HEDSA 
RKNUM 
o1 
MOV 
suB 
ROL 
ROL 
BIS 
CLR 
JMP 


EMT 
CON’ 
JSR 
CMP 
BNE 
BIS 


MACY11.624 6°SEP*73 14333 PAGE 6 


€10,WORK 
*@TABLE,%0 
(0) 

WORK 
CLRTAB 
@1000,%6 
0340,0PS 
FLAG 
TRACK 

DMA 

PATNU 
€400,SWRDCT 


SWRDCT,WROCT 


7,MAMF 

@SUR 

CONM 
€70000-FLAG 
TEXBUF 
eBIT11,e0CS 
RCNODV 

010, TEXBUF 
RCNODV 

61, TEXBUF 
04,0DAE 
SPECOR 
TEXBUF 
REPDRV 


@5,CONV 


TEXBUF ,DSKNOR 


61,DSKNOR 
DSKNOR 
DSKNOR 
eBIT1I1,FLAG 
@DAE 

ADTST 


sCLEAR THE wORLD 


sCLEAP ERROP TABLE 


9SET UP STACK 

sLOCK UP INTERRUPT LEVELS 
sCLEAR PROGRAM FLAG 
sCLEAR TRACK REGISTERS 
sCLEAR DAR REGISTERS 
sCLEAR PATTER COUNT 


sSET UP STANDARD WORD COUNT 


9SET PARITY SWITCHES 


sOPERATE UNDER PROGRAM CONTROL 


sTEST NONSEXISTENT DISK 
sNO DEVICE! 

sTESTED FOR ALL DEVICES? 
sREPORT NUMBER 

sINC, DEVICE COUNT 
sADDRESS NEXT DISK 


sTEST FOR 0 DEVICES 
sREPORT 0 DEVICES 


sCONVERT TO ASCII 


sTYPE NUMBER OF DEVICES 


sSAVE & OF DISKS 

sFIRST DISK IS ZERO 
sSHIFT LEFT TO MATCH 
sFLAG POSITION 

sSET PROGRAM MODE IN FLAG 
sRESET TO DISK 0 


CONVERSATION MODE 


+1 


97, ALPHA 
0153, TEXBUF 
0010 
@BITI0O,FLAG 


pASK ABOUT DATA TEST ONLY 


9GO WAIT FOR ANSWER 
sTEST FOR YES 
sBRANCH IF NO 


ro 


CCL nnn cn cn nn cn cn nn eee ence eee rene ee ee ee 


MAINDEC*11°DZRF Bb RF11 DATA TEST REPLACES DSOA MACY11.624 6°SEP*73 14333 PAGE 7 
OZRFBB,P11 
255 001420 104001 EMT +1 
256 001422 014104 CON2 sASK ABOUT MULTI DISK “UDE 
257 001424 004767 011376 JSR 87, ALPHA 9GO WATT FOR ANSWER 
258 001430 022767 000153 012010 CMP 0153, TEXBUF sTEST FOR YES 
259 001436 001026 BNE DATTES 300 NOT ENTER STATIC TEST 
260 001440 052767 004000 177374 B1S eBITiII,FLAG ¢SET FLAG TO ENTER STATIC TEST 
261 001446 104001 DSKDRs EMT +1 
262 001450 014124 CON3 
263 001452 004767 011340 JSR %7,NOCHA 
264 001456 162767 000001 011762 SUB 61, TEXBUF 
265 001464 022767 000010 011754 CMP 610, TEXBUF 
266 001472 101765 BLOS DSKDR 
267 001474 016767 011746 177374 MoV TEXBUF ,-DSKNOR 
266 001502 006167 177370 ROL DSKNOR 
269 001506 006167 177364 ROL DSKNOR 
270 001512 000420 BR ASKwC 
271 001514 104001 DATTES: EMT +1 
272 001516 014155 CON4 ASK UNIT NUMBER 
273 001520 004767 011272 JSR %7,NOCHA sWAIT FOR NO, 
274 001524 022767 000010 011714 CMP 610, TEXBUF 91S NO s 0>10 
275 001532 101770 BLOS DATTES #NO 
276 001534 000241 cLe 
277 001536 006167 011704 ROL TEXBUF 
278 001542 006167 011700 ROL TEXBUF 
279 001546 056767 011674 177266 BIS TEXBUF ,FLAG 
280 001554 104001 ASKWCs EMT o1 
281 001556 014166 Cons sASK ABOUT OPTIONAL WORD COUNT 
282 001560 004767 011242 JSR 7, ALPHA sWAIT FOR ANSWER 
283 001564 022767 000153 011654 CMP 6153, TEXBUF 
284 001572 001023 BNE OPDAR sASK ABOUT OPTIONAL DAR 
285 001574 104001 WCCONs EMT +1 
286 001576 014205 CON6 sASK LENGTH OF WC 
287 001600 004767 011212 JSR &7,NOCHA 
288 001604 005767 011636 Tst TEXBUF 
289 001610 001771 BEQ wCCON 
290 001612 022767 001001 011626 CMP 01001, TEXBUF 21S WORD COUNT>1000 
291 001620 101765 BLOS wCCON sYES ASK FOR COUNT AGAIN 
292 001622 016767 011620 177234 MOV TEXBUF,SWRDCT sOPERATING WORD COUNT 
293 001630 016767 177230 177210 MOV SUROCT,WROCT 
294 001636 104001 OPDARs EMT o1 
295 001640 014232 CON? gASK ABOUT OPTIONAL DAR 
296 001642 004767 011150 JSR %7,NOCHA 
297 001646 022767 004000 011572 CMP #4000, TEXBUF 33777 MAX DAR ADDR 
298 001654 101770 BLOS OPDAR 


299 001656 016767 011564 177166 MOV TEXBUF, DMA sTEMP DAR REGISTER 


4% 





MAINDEC-11°DZRFBoB RFi1 DATA TEST REPLACES DSOA MACY11,624 6eSEP<-73 14833 PAGE 8 


OZRFRB P11 
300 
301 0016064 104001 OPPAT: EMT +1 
302 001666 014245 CONS sASK ABOUT DATA PATTERNS 
303 001670 004767 011122 JSPR &7,NOCHA 
304 001674 022767 000023 011544 CMP 023, TEXBUF sTEST FOR CORRECT NO 
305 001702 101770 BLOS OPPAT sASK AGAIN 
306 001704 022767 000022 011534 CMP 622, TEXBUF 
307 001712 001414 BEO OPwRT sDATA PATTERN UNDER PROGRAM CONTROL 
308 001714 052767 100000 177120 BIS eBITiIS,FLAG sSET PROGRAM FLAG 
309 001722 016767 011520 177124 MOV TEXBUF, PATNU sOPERATOR WANTS TO SELECT DATA 
310 001730 000241 cLc 
311 001732 006167 177116 ROL PATNU 
312 001736 042767 070000 177076 BIC 670000, FLAG sCLEAR OP MODE BITS IN FLAG 
313 001744 104001 OPWRTs EMT o1 
314 001746 014270 CON9 sASK ABOUT WRITE 
315 001750 004767 011052 JSR %7,ALPHA 
316 001754 022767 000153 011464 cup 0153, TEXBUF #TEST FOR YES 
317 001762 001003 BNE OpwCK sASK ABOUT WRITE CHECK 
318 001764 052767 040000 177050 BIS OBIT14,FLAG sYES SET FLAG BIT 
319 001772 104001 OPWCKs EMT +1 
320 001774 014300 E COoNn10 sASK ABOUT WRITE CHECK 
321 001776 004767 011024 JSR &7, ALPHA 
322 002002 022767 000153 011436 CMP 0153, TEXBUF sTEST FOR YES ANSWER 
323 002010 001003 BNE OPRD 9GO ASK ABOUT READ 
324 002012 052767 020000 177022 BIS @BIT13,FLAG sYES SET FLAG BIT 
325 002020 104001 OPRD: EmT o1 
326 002022 014316 CON11 sASK ABOUT READ 
327 002024 004767 010776 JSR &7,ALPHA 
328 002030 022767 000153 011410 CMP 0153, TEXBUF sTEST FOR YES ANS#ER 
329 002036 001003 BNE CHKFLG 
330 002040 052767 010000 176774 BIS @BITI2,FLAG sSET FLAG TO READ 
331 002046 032767 070000 176766 CHKFLG: BIT 870000-FLAG 
332 002084 001733 BEO OPWRT 
333 3 
334 ’ 
335 3 
336 002056 032767 004000 176756 ADTST: BIT @BITIL,FLAG SARE WE IN MULTI DISK MODE 
337 002064 001423 BEO EXMFLG sBRANCH IF NO, 
338 002066 104001 EmT o1 
339 002070 014002 MES11 
340 002072 016767 176744 010714 MOV FLAG, ACNVX 
341 002100 006067 010710 ROR ACNVX 
342 002104 006067 010704 ROR ACNVX 
343 002110 042767 177770 010676 BIC 6177770, ACNVX sFETCH DISK 6 
344 002116 004567 010612 JSR 85,CONV 3 
345 002122 013014 ACNVX 
346 002124 014014 MES12 
347 002126 000001 i 
348 002130 104001 EMT o1 
349 002132 014014 MES12 
350 002134 032767 002000 176700 EXMFLG: BIT @BITI0, FLAG sTEST FOR DATA TEST ONLY 
351 002142 001402 ; BEQ 26 900 COMPLETE TEST 


352 002144 000167 003020 . JMP DATAT 900 DATA TEST ONLY 





MAINDECe11¢DZRFBoB PFiil DATA TEST REPLACES DS50A MACY11.624 6°SEPe73 14:33 PAGE 9 
OZRFBB,P1i1 
354 
355 
356 
357 1@eeADDRESS ADT2eee 
358 q 
359 sIN THIS TEST WRITE TRACK ZERO WITH ZERO’S 
360 sTHEN WRITE ALL ONES IN AN ADDRESS 
361 sCHECK IF WRITING ONES IN THAT ADDRESS ALTERED 
362 sANY OTHER ADDRESS IN THE TRACK 
363 sFOLLOW THIS PROCEDURE FOR ADDRESSES 0 TO 3777 
364 3 
365 i] 
366 002150 012706 001000 ADT23 MOV @1000,%6 9SET UP STACK 
367 002154 012767 001000 176664 MOV €1000,WRDCT 9SET UP WORD COUNT 
368 002162 012767 014466 176666 MoV sOUTBUF ,BUF sSET UP CURRENT ADDRESS 
369 002170 016767 176660 176672 MOV PATNU, SAVE 
370 002176 005067 176652 CLR PATNU 
371 002202 005067 176642 CLR TRACK 
372 002206 005067 176640 CLR DMA 
373 002212 004567 005402 JSR $5,PASEL sSET UP DATA BUFFER 
374 002216 016767 176646 176630 MOV SAVE, PATNU 
375 peeeewRITE DISK ADDR, 0 TO 3777 WITH ZEROES eese 
376 002224 052777 000400 176562 RFADT: BIS eBITe,e@0CsS 
377 002232 104403 WRITE 
378 002234 105777 176554 TSTB eocs sTEST FOR READY 
379 002240 100375 BPL 74 
380 002242 005777 176546 TST epcs #TEST FOR ERROR 
381 002246 100016 BPL RDMORE 
382 002250 012767 000001 176610 MOV @1,ERCOUNT sERROR OCCURRED 
383 002286 017767 176532 176624 MOV @DCS, WORK, sFETCH DCS REGISTER 
384 002264 017767 176532 176614 MOV @DAR, WORK 
385 002272 005367 176610 DEC WORK 
386 002276 004567 010070 ERis JSR 5S, STAER{ pREPORT ERROR OCURRED 
3867 s@@eeWRDISCONTROL STATUS REG, AT THE THE TIME OF THE ERROR eoee 
3868 pe@eeeWRD2eDISK ADDR, AT THE TIME OF THE ERROR eve 
389 002302 000750 BR RFADT sLOOP ON ERROR 
390 002304 022767 003000 176540 RDMORE: CMP €3000,DMA 
391 002312 001404 BEQ RFRDo4 
392 002314 062767 001000 176530 ADD #1000,0MA 
393 002322 000740 BR RFADT 
394 002324 005067 176542 CLR SAV1i 


395 002330 005067 176534 RFRDs CLR SAVE 





CASE I RR 


MAINDEC?11°DZRFB°B 
OZRFBB,Pi1 


396 
397 
398 
399 
400 
401 
402 
403 
404 
405 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 
428 
429 
430 
431 
432 
433 
434 
435 
436 
437 
438 
439 
440 
441 
442 
443 


002334 
002342 
002350 
002356 
002364 
002372 
002374 
002400 
002402 
002406 
002410 
002416 
002424 
002432 


002436 
002440 
002446 
002454 
002460 
002462 
002466 
002474 
002476 
002502 
002510 
002512 
002514 
002522 
002530 
002536 
002544 
002552 
002554 
002560 
002562 
002566 
002570 
002576 
002604 
002610 
002616 
002622 
002630 
002634 
002636 
002640 
002642 
002644 


012727 
012767 
012767 
016767 
052777 
104403 
108777 
100375 
005777 
100014 
017767 
016767 
012767 
004567 


000736 
016767 
042767 
016700 
006100 
042700 
026767 
001407 
005060 
022767 
001463 
000403 
012760 
052777 
012767 
012767 
016767 
104407 
105777 
100375 
¢08777 
100030 
017767 
016767 
005367 
012767 
004567 
017767 
004567 
013014 
013663 
000006 
104001 
013663 


RF11 DATA TEST REPLACES DSOA 


177777 


000001 
176510 
000400 


176414 
176406 


176400 
176450 
000003 
007734 


176426 
000777 
176412 


176001 
176376 


014466 
004000 


177777 
000400 
001000 
014466 
176320 


176234 
176226 


176220 
176270 
176276 
000004 
007550 
176174 
010100 


177777 
176506 
176470 
176466 
176422 


176472 
176462 
176434 


176440 
176432 


176412 
176360 


014466 
176264 
176310 
176312 
176300 


176312 
176302 


176250 
010164 


MOV 
MOV 
MOV 
MOV 
BIS 
WRITE 
TSTB 
BPL 
TST 
BPL 
MOV 
MOV 
MOV 
JSR 


WONWD3 


MACY11.624 


Goi, 8-1 
OwONWDe4, BUF 
@1,WROCT 
SAV1,DMA 
eBITe,e@eDCS 


eocs 

74 

eocs 

SUADB 
@DCS, WORK) 
SAV1, WORK 
63, ERCOUNT 
eS, STAERI 


6°SEP-73 


14:33 PAGE 10 


sTEST FOR READY 
sTEST FOR ERROR 
sBRANCH IF NO CONTROL ERROR 


sSETUP ERROR COUNT 
sREPORT ERROR 


peoeoWRDISDISK CONTROL STATUS AT THE TIME OF THE ERROReeee 
peeeeWRD2eDISK ADDR, IN ERROR WHEN TRYING TO WRITE ALL ONES seee 


BR wONWD sREeWRITE WORD 
SUADBs MOV SAV1, WORK 
BIC 6777,WORK sMASK TO BLOCKS 
MOV SAV1.%0 
ROL 80 
BIC #176001,%0 sMASK TO BUFFER SIZE 
CmP SAVE, WORK 
BEO 18 sTEST WORD IN THIS BLOCK 
CLR OUTBUF (0) sNOT IN BLOCK@CLEAR 
CMP 64000,SAVE sWRITTEN ALL TRACKS? 
BEQ ZEROAD 
BR WRCADT 
iss MOV eo] ,OUTBUF (0) 3SET BUFFER WD TO-1 
WRCADT: B18 eBITS,e0Cs 
MOV €1000,WRDCT sSETUP WORD COUNT 
MOV sOUTBUF ,BUF sSETUP CURRENT ADOR 
MOV SAVE,DMA #SETUP DISK ADDRESS 
WRCHECK 
TSTB eocs sCHECK FOR READY 
BPL 274 
TST eocs sTEST FOR ERROR 
BPL CHKBUF sBRANCH WO DISK ERROR 
MOV @DCS, WORK’ 
MOV SAV1,WORK 
DEC WORK 
MOV 04, ERCOUNT sSET UP ERCOUNT 
ER43 JSR 5, STAER1I sREPORT ERROR 
MOV @DAR, ACNVX 3SET UP DISK ADOR, FOR REPORT . 
JSR 95,CONV 
ACNVX 
MES4 
6 
EMT +1 
MES4 


seeeoWRDISDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR coos 
s@COWRDISDISK ADDR, IN ERROR DURING WRITE CHECK eee 


ph 


MAINDEC 1 1¢DZRFB=B 
OZRFBB,P11 


450 
451 002646 000725 


RF14 DATA TEST REPLACES DSOA MACY11,624 6eSEP-73 14:33 PAGE 11 


s@@@OWRD ADDR.SADDR., WHICH CONTAINS ALL ONES eee 
BR WRCADT 


iy- 





MAINDEC*11°DZRFB-B 
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452 
453 
454 
455 
456 
457 
458 
459 
460 
461 
462 
463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
475 
476 
477 
478 
479 
480 
481 
482 
483 
484 


002650 
002656 
002660 
002664 
002672 
002676 
002704 
002712 
002714 
002720 
002722 
002726 
002730 
002736 
002744 
002752 


002756 
002760 
002766 
002770 
002774 
003000 
003006 
003010 


062767 
000670 
005067 
016767 
005027 
012767 
012767 
104403 
105777 
100375 
005777 
100014 
012767 
017767 
017767 
004567 


000740 
022767 
001404 
005267 
000167 
032777 
001402 
000167 


RF11 DATA TEST REPLACES DSOA 


001000 


176204 
176202 
000000 
002674 
000001 


176074 
176066 
600005 
1760582 


176052 
007414 


003777 
176076 
177330 
004000 


177134 


176212 CHKBUF: ADD 


ZEROAD: CLR 
176160 “OV 


176152 MOV 
176134 MOV 


176130 MOV 
176144 MOV 
176134 “OV 

ERS: JSR 


MACY11.624 


#1000,SAVE 
SUADRB 

SAVE 
SAV1,DMA 
60 
@,°2,BUF 
@4,WROCT 


eocs 

074 

epcs 
INDADT 
¢5,ERCOUNT 
@DCS, WORK) 
@DAR, WORK 
@5-STAERI 


6°SEP*73 14233 PAGE 12 


3G0 TO NEXT 
sBLOCK 


3 

;SETUP DISK ADDRESS 
sSET UP DATA 

sSETUP CURRENT ADDRESS 
sSETUP wOkD COUNT 
sCHECK FOR PEADY 


sTEST FOR EPROR 


:@@eeWRDISCONTROL STATUS REG, AT THE TIME OF THE ERROR evoe 
s@eeeWRD22DISK ADDR, AT THE TIME OF THE ERROR eee 


176104 INDADTs: CMP 


175772 LP2AD0T: BIT 


ZEPOAD 
63777,SAV1i 
LP2ADT 

SAV1 

RFRD 
eBIT11,@SwR 
#6 

ADT2 


7LOOP ON ERROR 
#LAST ADDR, CHECKED 


sCHECK NEXT ADDRESS 
sIS BIT 11 SET IN SwWR 


sBIT 11 SET LOOP ON TEST 


AY 


MAINDEC*11°DZRF BoB RF11 DATA TEST REPLACES DSOA MACY11,624 6°SEP*73 14:33 PAGE 13 
OZRFBB.P11 





EERE EEE ee 


MAINDECe1 1 eDZRFB-B RFii DATA TEST REPLACES DSOA MACY11.624 6eSEPe73 14333 PAGE 14 
OZRFBB,P1i1 
486 
487 i 
4686 seeeee ADDRESS TEST seene 
489 ’ 
490 SWRITE EACH UNIQUE ADDRESS ON ITSELF FOR TRACK 0 
491 sTHEN READ IT BACK AND COMPARE FOR THE 
492 sCORRECT DATA 
493 3 
494 ; 
495 003014 005067 176032 ADT33 CLR DMA sCLEAR ACTIVE REG 
496 003020 005067 176024 CLR TRACK 
497 003024 005067 176056 CLR WORK 
498 003030 005067 176054 CLR WORK! 
499 003034 012706 001000 MOV #1000,%6 sSETUP STACK 
500 003040 012767 014466 176010 MOV eOUTBUF,BUF sSET UP CURRENT ADDRESS 
501 003046 012767 001000 175772 MOV @€1000,WRDCT sSET UP WORD COUNT 
502 003054 012700 014466 MOV @OUTBUF,%0 sFILL BUFFER WITH COUNT 
503 003060 016720 176022 INADBs MOV WORK, (0)¢ 
504 003064 005267 176016 rnc WORK 3¢1 COUNT 
505 003070 022700 016466 CMP sOUTBUF+¢2000,%0 
$06 003074 001373 BNE INADB sSET UP NEXT WORD 
507 003076 016767 176004 175764 MOV WORK, SAVE 
$08 003104 052777 000400 175702 WRABFs: B18 eBIT@,eDCcS sCLEAR THE DISK WORLD 
509 003112 104403 WRITE sWRITE 
510 003114 105777 175674 TSTB epcs 91S THE CONTROL READY 
$11 003120 100375 BPL 274 sCONTROL READY 
$12 003122 005777 175666 TST eocs 918 THERE AN ERROR 
$13 003126 100011 BPL TFBL 3NO ERROR 
514 003130 017767 175660 175750 MOV @DCS, WORK sFETCH CONTENTS OF CONTROL REG 
$15 003136 012767 000006 175722 MOV @6,ERCOUNT sSET UP ERROR COUNT 
$16 003144 004567 007154 ER63 JSR &5,STAER sREPORT CONTROL ERROR 
$17 p@eeeWRDISDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR evee 
$18 003150 000755 BR WRABF sREeWRITE DATA 
$19 003152 016767 175712 175726 TFBLs MOV SAVE, WORK 
520 003160 062767 001000 175664 ADD @1000,DMA 
521 003166 022767 004000 175712 cue 64000, WORK HAVE WE WRITTEN ALL OF TRACK 0 
$22 003174 001327 BNE INADBo4 
523 003176 005067 175704 CLR WORK 
$24 003202 005067 175644 CLR DMA 
525 003206 005067 175676 CLR WORK! 
526 003212 052777 000400 175574 RDTDNs BIS @BITé,@DCS sCLEAR THE DISK 
527 003220 104405 READ 
526 003222 108777 175566 TSTB epcs 81S THE CONTROL READY 
529 003226 100375 BPL 274 sYES THE CONTROL IS READY 
530 003230 005777 175560 TST epcs 91S THERE AN ERROR 
531 003234 100011 BPL ADRCMP 3NO ERROR 
532 003236 012767 000007 175622 MOV ¢7,ERCOUNT sSET UP ERROR COUNT 
533 003244 017767 175544 175634 MOV @DCS, WORK sFETCH CONTROL REG, 
$34 003252 004567 007046 ER7:3 JSR @5,STAER sREPORT CONTROL ERROR 
535 s#@eeWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR seee 
536 003256 000755 BR RDTON sRE°READ 
537 003260 012767 014466 175602 ADRCMPs MOV eOUTBUF, SAVE 





en nnn nn nn nner ee rere eee 
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OZRFBB,Pi1 
538 
$39 003266 027767 175576 175614 CMPNEX: CMP @SAVE, WORK! 31S THE ADDRESS CORRECT 
$40 003274 001410 BEQ INCCMP sCOMPARE NEXT WORD 
$41 003276 017767 175566 175602 MOV @SAVE, WORK sFETCH LOAD ADDRESS 
542 003304 012767 000010 175554 MOV @10,ERCOUNT sSET UP ERROR COUNT 
543 003312 004567 007054 ER108 JSR @5,STAERI sREPORT COMPARISON ERROF 
544 p@eeeWRDISDISK ADDR, WANTED evee 
545 s@@eCeWRDZSDISK ADDR, RECEIVED seoe 
546 003316 062767 000002 175544 INCCMPs ADD @2,SAVE 
547 003324 005267 175560 tac WORK! 
548 003330 022767 016466 175532 CMP @OUTBUF+2000,-SAVE 31S IT THE LAST ADDR INBUF 
549 003336 001353 BNE CMPNEX sCOMPARE NEXT WORD 
550 003340 022767 004000 175542 CMP €4000,WORK{ 21S IT THE LAST ADDR, OF TRACK 
551 003346 001404 BEOQ LPADT3 
552 003350 062767 001000 175474 ADD @1000,DMA sSET UP FOR NEXT BUFFER 
553 003356 000715 ’ BR ROTDON 3GO READ BUFFER 
554 003360 032777 004000 175412 LPADT3: BIT @BIT1I1,@SwWR sLOOP ON TEST? 
555 003366 001212 BNE ADT} sYES BIT 11 SET IN SwR 
556 ’ 
557 ’ 
558 , 
559 ’ 
560 ’ 
561 sRFii TRACK SELECTION TEST 
562 i 
563 sWRITE THE FIRST AND LAST ADDRESS OF EACH TRACK 
564 sWITH THE OCTAL VALUE OF EACH TRACK 
$65 sBITS O THRU 6 EQUAL THE TRACK NUMBER 
566 sBIT 15 RESET EQUALS ADDR O OF THE TRACK 
567 sBIT 15 SET EQUALS ADDR 3777 OF THE TRACK 
568 i] 
569 PAFTER WRITING THE DISK READ EACH ADDRESS 
570 sAND COMPARE DATA FOR THE CORRECT VALUE 
$71 Hy 
$72 003370 005067 175456 ADT4:3 CLR DMA sCLEAR WORK REGISTERS 
573 003374 005067 175450 CLR TRACK 
574 003400 005067 011062 CLR OUTBUF 
575 003404 012706 001000 MOV @€1000,%6 sSETUP STACK 
576 003410 052777 000400 175376 BIs @BIT®,epcs sCLEAR THE DISK WORLD 
577 003416 012767 014466 175432 MoV soUTBUF,BUF sSET CURRENT ADDRESS 
578 003424 012767 000001 175414 MOV @1,WROCT sSET UP WORD COUNT 
579 003432 104403 INSWT: WRITE 360 WRITE 
580 003434 105777 175354 TSTB epcs 31S READY SET 
581 003440 100375 BPL 204 sYES! WAIT FOR NOT BUSY 
$82 003442 005777 175346 TST epcs sTEST FOR ERROR 
$83 003446 100011 BPL TSTTK 3NO ERROR GO ON 
584 003450 012767 000011 175410 MOV #11,ERCOUNT sSET UP ERROR COUNT 
565 003456 017767 175332 175422 MOV @0CS, WORK sREPORT CONTENTS OF DCS REG 
586 003464 004567 006634 ERii3 JSR @3,STAER sREPORT ERROR OCCURRED 
587 s@eeeWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR seve 
$686 003470 000760 BR INSWT 360 REWRITE 
589 003472 022767 100177 010766 TSTTK:s CMP €100177,OUTBUF ;sTEST FOR LAST ADDR, 
590 003500 001427 BEO INSRD 3GO READ THE DATA 


591 003502 032767 100000 010756 BIT eBIT1S,OUTBUF 91S IT ADDR ZERO 
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OZRFBB.Pi1 
$92 003510 001007 BNE MVNEM sNO 
593 003512 052767 100000 010746 BIS @B1T15,OUTBUF sYES! SET UP FOR LAST ADDR 
594 003520 062767 003777 175324 ADD 63777,0MA sSET UP FOR LAST ADDR 
$95 003526 000741 BR INSWT 3GO WRITE 
596 003530 042767 100000 010730 “VNEM; BIC eBIT1S,OUTBUF sSET UP FOR ADDR ZERO 
597 003536 005267 010724 Inc OuTBUF sINC, TO NEXT TRACK 
598 003542 062767 000001 175302 ADD @1,DMA sINC, BAR 
$99 003550 103330 Bcc INSWT 9GO WRITE NO CARRY TO DAE 
600 003552 005267 175272 Tne TRACK sINC, DAE REG, 


601 003556 000725 BR INSbT 3GO WRITE 





MATNDECe11°DZRFB<B RF1i1 DATA TEST REPLACES DSOA MACY11,624 G6eSEP*°73 14833 PAGE 17 

OZRFBB,P1i1 
602 
603 7 
604 sREAD THE FIRST AND LAST ADDRESS OF EACH TRACK 
605 sAND VERTFY IT HAS THE CORRECT DATA 
606 
607 003560 005067 175266 INSROs CLR DMA sCLEAR WORK REG, 
606 003564 005067 175260 CLR TRACK 
609 003570 005067 175274 CLR SAVE 
610 003574 052777 000400 175212 BIS eBIT@,@DCS sCLEAR THE DISK WORLD 
611 003602 012767 015070 175246 MOV @INBUF, RUF 3SET UP CURRENT ADDR 
612 003610 012767 000001 175230 MOV @1,WROCT :SET UP WORD COUNT 
613 003616 104405 RDTKS: READ sREAD DATA 
614 003620 105777 175170 TSTB epcs sCHECK FOR READY 
615 003624 100375 BPL 274 sCONTROL NOT READY 
616 003626 005777 175162 TST eocs 31S THERE AN ERROR 
617 003632 100011 BPL CMPDTK 3NO ERROR 
618 003634 012767 000012 175224 MOV €12,ERCOUNT sSET UP ERROR COUNT 
619 003642 017767 175146 175236 MOV @DCS, WORK sFETCH CONTENTS OF DCS 
620 003650 004567 006450 ERi2: JSR &5,STAER sREPORT CONTROL ERROR 
621 s@@@eWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR eose 
622 003654 000760 BR ROTKS 9GO RE°READ 
623 003656 026767 175206 011204 CMPDTK: CMP SAVE, INBUF 31S DATA CORRECT 
624 003664 001413 BEQ CMNETK sYES SETUP FOR NEXT WORD 
625 003666 016767 175176 175214 MOV SAVE, WORK) sCORRECT ADDRESS 
626 003674 016767 011170 175204 MOV INBUF , WORK sINCORRECT DATA 
627 003702 012767 000013 175156 MOV 013,ERCOUNT #SET UP ERROR COUNT 
628 003710 004567 006456 ER133 JSR eS,STAERI sREPORT SELECTION ERROR 
629 s@Se@OWRDISTRACK ADDR, WANTED eevee 
630 P@SCOWRDZSTRACK ADDR, RECEIVED evee 
631 003714 022767 100177 175146 CMNETK: CMP €100177,SAVE 31S IT THE LAST ADDR 
632 003722 001427 BEQ LPTSK sEND OF TEST 
633 003724 032767 100000 175136 BIT eBIT1S,SAVE 31S IT ADDR 0 OF THE TRACK 
634 003732 001414 BEOQ ZRBIT sNO} SETUP FOR LAST ADDR 
635 003734 042767 100000 175126 BIC eBITiS,SAVE 9SET UP FOR ADDR ZERO 
636 003742 005267 175122 INC SAVE sINC FOR TRACK NO, 
637 003746 062767 000001 175076 ADD @1,DMA sSET UP DAR 
638 003754 103320 Bcc RDTKS 9GO READ NEXT TRACK ADDR 
639 003756 005267 175066 Inc TRACK sINC TRACK 
640 003762 000715 BR ROTKS 3GO0 READ 
641 003764 052767 100000 175076 ZRBIT: BIS @BIT1S,SAVE sSET UP FOR LAST ADDR 
642 003772 062767 003777 175052 ADD 63777,0MA sSET UP FOR LAST WORD 
643 004000 000706 BR ROTKS 3GO READ LAST ADDR OF TK 
644 004002 032777 004000 174770 LPTSK: BIT OBIT11,@SWR 91S BIT 11 SET IN SwR 
645 004010 001402 BEQ 246 sYES LOOP ON TEST 


646 004012 000167 177352 JMP ADT4 
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OZRFBB,P11 
647 ’ 
646 sRF11 LOOK AHEAD TEST 
649 sWRITE ONE WORD UPON RECEIPT OF 
650 #NOT READY READ THE LOOK AWEAD 
651 sREGISTER IT SHOULD CONTAIN THE 
652 sADDRESS ¢1 
653 ’ 
654 004016 005067 175030 ADTS: CLR DMA sCLEAR REGISTERS 
655 004022 005067 175022 CLR TRACK 
656 004026 005067 175036 CLR SAVE 
657 004032 012706 001000 MOV #1000,%6 sSETUP STACK 
658 004036 012767 000001 175002 MOV 61,WRDCT sSET UP FOR ONE WORD X-FER 
659 004044 012767 014466 175004 MOV sOUTBUF,BUF sSET UP CURRENT ADDRESS 
660 004052 052777 000400 174734 WRADTSs BIS eBITe,e0Cs sCLEAR THE DISK 
661 004060 016700 174746 MOV ADS,%0 
662 004064 016701 174724 MOV 0CS,%1 
663 004070 104403 WRITE sWRITE 
664 004072 011037 001106 183 MOV (0), @eWORK sFETCH LOOK AHEAD 
665 004076 105711 TSTB (1) 31S THE CONTROL BUSY 
666 004100 100374 BPL is sCONTROL STILL BUSY 
667 004102 005777 174706 TST eocs s1S THERE AN ERROR 
668 004106 100011 BPL LPADTS sNO DISK ERRORS 
669 004110 012767 000014 174750 “OV 614,ERCOUNT sSET UP ERROR COUNT 
670 004116 017767 174672 174762 wov @DCS, WORK sFETCH DCS FOR REPORT 
671 004124 004567 006174 ER14: JSR &5,STAER sREPROT CONTROL ERROR 
672 p@@eoWRDIsDISK CONTROL REG AT THE TIME OF THE ERROR cove 
673 004130 000750 BR WRADTS sLOOP ON ERROR 
674 004132 016767 174714 174750 LPADTS: MOV DMA, WORK{ 91S LOOK AHEAD CORRECT 
675 004140 026767 174744 174740 CMP WORK1, WORK 
676 004146 001416 BEQ IWCADS sLOOK AHEAD OK 
677 004150 005367 174732 DEC WORK sCOMPARE FOR ADDRESS+1 
678 004154 026767 174730 174724 CMP WORK1, WORK ’ 
679 004162 001410 BEO INCADS sBRANCH IF EQUAL 
680 004164 005267 174716 Inc WORK 
681 004170 012767 000015 174670 MOV €15,ERCOUNT 
682 004176 004567 006170 ER1Ss JSR 85,STAERI sREPORT LOOK AHEAD INCORRECT 
683 s@@@oWRDISDISK ADOR, WANTED FROM LOOK AHEAD REG, evee 
684 s@@eeWRD2EDISK ADDR, RECEIVED FROM DISK LOOK AHEAD REG, seve 
685 004202 000723 BR WRADTS sLOOP ON ERROR 
686 004204 022767 003777 174640 INCADS: CMP 63777,DMA 91S IT THE LAST ADDR, 
687 004212 001403 BEQ XLPADTS sLAST ADDRESS EXIT 
686 004214 005267 174632 Inc DMA 9¢1 DMA 
689 004220 000714 BR WRADTS sCHECK NEXT ADDRESS 
690 004222 032777 004000 174550 XLPADTS:BIT OBITI1,0SwWR sLOOP ON TEST 
691 004230 001272 BNE ADTS sYES LOOP ON TEST BIT 11 SET 
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OZRFBB,P11 
692 ’ SPIRAL TESTS 
693 H 
694 sWRITE THE LAST WORD OF TRACK ZERO 
695 sAND THE FIRST WORD OF TRACK ONE 
696 sUSING ONE WORD X-FERS 
697 sDATE & $2525 
698 004232 052777 000400 174554 SPIRAL: BIS eBITe,e@0CS sCLEAR THE DISK 
699 004240 012777 000340 174534 MOV 8340,0PS sLOCK UP PROCESSING 
700 004246 012706 001000 MOV #1000,%6 sSETUP STACK 
701 004252 012767 000001 174566 MOV @1,WROCT sSET wORD COUNT TO 1 
702 004260 005067 174564 CLR TRACK 
703 004264 012767 003777 174560 MoV 03777,DMA sLAST WORD OF TRACK ZERO 
704 004272 012767 052525 010166 MOV 652525,O0UTBUF sSET UP DATA 
705 004300 012767 014466 174550 “OV COUTBUF,BUF . 
706 004306 104403 WRITE sWRITE LAST ADDR TK ZERO 
707 004310 105777 174500 TSTB epcs sTEST FOR READY 
708 004314 100375 BPL 274 sCONTROL STILL BUSY 
709 004316 005777 174472 TST epcs 
710 004322 100011 BPL SPIL1 
711 004324 012767 000016 174534 MOV 616,ERCOUNT 
712 004332 017767 174456 174546 MoV @DCS, WORK 
713 004340 004567 005760 ER16% JSR &5,STAER 
714 p@@@oWRDISDISK CONTROL STATUS REG, AT THE TIME OF THE EFROR ese 
715 004344 000732 BR SPIRAL 
716 004346 005267 174500 SPILis INC DMA 
717 004352 104403 WRITE sWRITE FIRST ADDR, TK 1 
716 004354 105777 174434 TSTB encs sWAIT FOR READY 
719 004360 100375 BPL 024 sCONTROL STILL BUSY 
720 004362 005777 174426 TST eocs 
721 004366 1000113 BPL SPIL2 
722 004370 012767 000017 174470 MOV 617, ERCOUNT 
723 004376 017767 174412 174502 MOV @0CS, WORK 
724 004404 004567 005714 ERi7:8 JSR e5,STAER 
725 peeeoWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR see 
726 004410 000710 BR SPIRAL 
727 004412 005267 174430 SPIL2s Inc WROCT sSET UP FOR TWO WORD XeFER 
728 004416 012767 003777 174426 MOV 03777,DMA sSTART AT ADDR 3777 
729 004424 012767 015070 174424 MOV eINBUF,BUF a 
730 004432 104405 READ sREAD DATA 
731 004434 105777 174354 TSTB eocs sTEST FOR READY 
732 004440 100375 BPL 274 sCONTROL STILL BUSY 
733 004442 005777 174346 TST eocs 
734 004446 100011 BPL SPIL3 
735 004450 012767 000020 174410 MOV #20, ERCOUNT 
736 004456 017767 174332 174422 MOV @DCS, WORK 
737 004464 004567 005634 ER208 JSR &5,STAER 
738 peoooWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR eee 
739 004470 000660 BR SPIRAL 
740 004472 022767 052525 010370 SPIL3: CMP 652525, INBUF sCMP ADDR DAR 3777 
741 004500 001414 BEO CMPX1 sCOMPARE SECOND WORD 
742 004502 012767 000021 174356 MOV @21-<KCOUNT sSETUP ERROR COUNT 
743 004510 016767 010354 174370 MOV INBUF, #ORK sINCORRECT DATA 
744 004516 012767 052525 174364 MoV 652525, WORK} sCORRECT DATA 


745 004524 004567 005642 ER2i: JSR €5,STAERi sREPORT ADDR 377 HAE BAD DATA 
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746 
747 
748 
749 
750 
751 
782 
7383 
754 
755 
756 
787 
758 
759 


004530 
004532 
004540 
004542 
004550 
004556 
004564 


004570 
004572 
004600 


000640 
022767 
001414 
012767 
012767 
016767 
004567 


000620 
032777 
001214 


RF11 DATA TEST 


004000 


010332 
174316 


174332 
174322 


174200 


REPLACES DSOA 
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geeeeWRDISTHE DATA THAT SHOULD HAVE BEEN IN ADDR, 377780008 
se@eeWRDZETHE DATA READ FROM ADDR, 37770000 


BR 
CMPXis CMP 
BEO 
MOV 
MOV 
MOV 
ER22: JSR 


SPIRAL 

052525, INBUFe2 
LPSPI1 
@22,ERCOUNT 
€52525,WORK1 
INBUF ¢2, WORK 
®S,STAERI 


#LOOP ON ERROR 

sCOMPARE NEXT WORD 
SBRANCH IF DATA OK 

sSETUP ERROR COUNT 
sCORRECT DATA 

sDATA READ FROM ADDRO TKi 
sREPORT ERROP 


peeeoWRDISTHE DATA THAT SHOULD BE IN ADDR, 0 OF TRACK 1 eeee 
p@@@eWDR2ETHE DATA READ FROMADDR,O OF TRACK 1 eeee 


BR 
LPSPIis BIT 
BNE 


SPIRAL 
eBITI1,@SwWR 
SPIRAL 


#LOOP ON ERROR 
sLOOP ON TEST? 
s¥ES BIT 11 SET IN SWR 


g3> 


—__ en cc ccc ccc c cc nc nnn nnn nn nn neers 
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OZRFBB,Pii 
760 ’ 
761 i 
762 ’ 
763 g 
764 ’ 
765 ’ 
766 ’ SPIRAL TEST EXT, 
767 ! 
768 WRITE TWO WORDS OF DATA 
769 SSTARTING WITH THE LAST ADDRESS OF TRACKO 
770 sDATA PATTERN & 25252 
771 #THEN READ THE DATA DOING ONE WORD 
772 IXeFERS 
773 004602 052777 000400 174204 XSPIRAL: B1S e@prITe,epcs sCLEAR THE DISK 
774 004610 012777 000340 174164 MOV 0340,0PS sLOCK UP PROCESSING 
775 004616 012706 001000 MOV #1000,%6 sSET UP STACK 
776 004622 012767 025252 007636 MOV €25252,O0UTBUF sSET UP DATA WORD 1 
777 004630 012767 025252 007632 MOV @25252,OUTBUFe¢2 sSET UP DATA WORD 2 
778 004636 012767 000002 174202 MOV @2,WRDOCT sSET UP WORD COUNT 
779 004644 012767 014466 174204 MOV eOUTBUF ,BUF sSET UP CMA 
780 004652 005067 174172 CLR TRACK sSET UP DISK ADDR, 
781 004656 012767 003777 174166 MOV 03777,DMA 
782 004664 104403 WRITE sWRITE DATA 
783 004666 105777 174122 TSTB eocs sTEST FOR READY 
784 004672 100375 BPL 274 sCONTROL STILL BUSY 
785 004674 005777 174114 TST ences sTEST FOR ERROR 
786 004700 100011 BPL XiSPIL sBRANCH IF NO ERROR 
787 004702 017767 174106 174176 MOV @DCS, WORK 
786 004710 012767 000623 174150 MOV €23,€RCOUNT #SET UP ERROR COUNT 
789 004716 004567 005402 ER233 JSR &5,STAER sREPORT CONTROL ERROR 
790 2@@@eWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR seve 
791 004722 000727 BR XSPIRAL 
792 004724 005367 174116 XiSPILs: DEC WROCT sSET UP FOR 1 WORD XeFER 
793 004730 012767 003777 174114 MOV 63777,D0MA sSET UP DAR 
194 004736 012767 015070 174112 MOV eINBUF,BUF sSET UP CMA 
795 004744 104405 READ sREAD DAR 3777 
796 004746 105777 174042 TSTB eocs TEST FOR NOT READY 
797 004752 100375 BPL 274 sCONTROL STILL BUSY 
798 004754 005777 174034 TST eocs sTEST FOR ERROR 
799 004760 100011 BPL X2SPIL sBRANCH IF NO ERROR 
800 004762 012767 000024 174076 MOV €24,ERCOUNT #SET UP ERROR COUNT 
801 004770 017767 174020 174110 MOV @DCS, WORK sREPORT CONTROL REG 
802 004776 004567 005322 ER243 JSR &5,STAER 
803 seeeeWRDIsDISK CONTROL STATUS REG, AT THE TIME OF THE THE ERROR eves 
804 005002 000677 OBR XSPIRAL sLOOP ON ERROR 
805 005004 022767 025252 010056 X2SPIL: CMP €25252,INBUF 318 ADDR 3777 CORRECT 
806 005012 001414 BEO X3SPIL sBRANCH IF NOT EQUAL 
807 005014 012767 000025 174044 MOV 0¢25,ERCOUNT sSET UP ERROR COUNT 
808 005022 012767 025252 174060 MOV @€25252, WORK) 3GOOD DATA 
809 005030 016767 010034 174050 MOV INBUF , WORK sDATA DATA 
810 005036 004567 005330 ER2S:3 JSR QS, STAER) sREPORT ERROR 
611 s@eeeWRDISTHE DATA THAT SHOULD BE IN ADDR,3777 OF TRACK 0 eevee 
812 s@@eeWRDQeTHE DATA THAT WAS READ FROM ADDR, 3777 OF TRACK 0 seve 


813 005042 000657 BR XSPIRAL #LOOP ON ERROR 


x? 
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ei4 
615 
816 
617 
618 
619 
820 
821 
822 
823 
624 


005044 
005050 
005052 
005056 
005060 
005064 
005066 
005074 
005102 


005267 
104405 
105777 
100375 
005777 
100011 
012767 
017767 
004567 


RFii DATA TEST REPLACES DSOA 


174002 X3SPIL: INC 
READ 
173736 TSTB 
BeL 
173730 TST 
BPL 
000026 173772 wOV 
173714 174004 MOV 
005216 ER26: JSR 


seeeeWRDISDISK CONTROL STATUS REG, AT THE TIME OF THE ERROR seco 
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epcs 

74 

eocs 

X4SPIL 
€26,ERCOUNT 
@DCS, WORK 
€5,STAER 


XSPIRAL 


+SET UP TO READ ADDR 4000 
sREAD DATA 

sTEST FOR READY 

sCONTROL STILL BUSY 

sTEST FOR ERROR 

sBRANCH IF NO ERROR 

sSET UP ERROR COUNT 
sREPORT CONTROL REG, 
sREPORT ERROR 


sLOOP ON ERROR 


K3 


nema ee 
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005110 
005116 
005120 
005126 
005134 
005142 


005146 
005150 
005156 
005160 
005164 


005170 
005174 
005202 
005206 
005214 
005222 
005230 
005234 
005240 
005246 
005250 
005256 
005260 
005266 
005270 
005272 
005274 
005302 
005304 
005312 
005314 
005322 
005330 
005332 
005340 
005342 
005344 
005346 
005354 
005356 
005364 


022767 
001414 
012767 
012767 
016767 
004567 


000615 
032777 
0012113 
005067 
005067 


012706 
012777 
004567 
016767 
012767 
012777 
004567 
004567 
032767 
001416 
012767 
104503 
032777 
001002 
000004 
000404 
016777 
000003 
032767 
001421 
012767 
012777 
104507 
032777 
001002 
000004 
000404 
016777 
000003 
032767 
001452 


RFii DATA TEST REPLACES DSOA 


000027 
025252 
007730 
005224 


173666 
173660 


001000 
000340 
003426 
173652 
005234 
000340 
002364 
001614 
040000 


014466 
001000 


173540 
020000 


014466 
000340 


173466 
010000 


007752 
173740 


173754 
173744 


173622 


173600 
173632 
173656 
173552 
173574 
173600 
173512 


173500 
173530 


173534 
173452 


173440 


173426 
173456 


X4SPIL: CMP 
BEG 
MOV 
MOV 
MOV 
ER273 JSR 


MACY11,624 


025252, INBUF 
LPXSPIL 

627, ERCOUNT 
625252,WORK{ 
INBUF , WORK 
€S,STAERI 


6°SEPo73 14833 PAGE 23 


sCMP DATA 

sBRANCH IF DATA OK 
9SET UP ERROR COUNT 
3GOOD DATA 

yOATA DATA 

sREPORT ERROR 


p@e@OWRDIGTHE DATA THAT SHOULD BE IN ADDR, 0 OF TRACK 1 seve 
p@@CCOWRDQSTHE DATA THAT WAS READ FROM ADDR, 0 OF TRACK j eevee 


BR 
LPXSPILsBIT 

BNE 
CLRREG: CLR 

CLR 


8 
’ 
‘ 
a 
5 
3 
i] 
3 
U 
DATAT: MOV 


MOV 


LOAT: JSR 


WRWAITs MOV 
SLH3 BIT 


WCWAITs MOV 
ESHs BIT 


XSPIRAL 
OBIT11,0S5WR 
XSPIRAL 

DMA 

TRACK 


#1000,%6 
0340,@PS 
eS, EXTMEN 
SWROCT,WROCT 
@LDAT, HRDER 
0340,0PS 
QS, PASEL 
@5,OPDSEL 
oBIT1I4, FLAG 
SLU 

eOUTBUF ,BUF 
#100 

@BIT9, OSWR 
WRWAIT 


SLH 
PRIORITY, OPS 


@BITI3,FLAG 
ESH 
eOUTBUF,BUF 
0340,0PS 
#100 
@BIT9,OSWR 
WCWAIT 


ES 
PRIORITY, OPS 


oBITI2,FLAG 
REH 


sLOOP ON ERROR 

sLOOP ON TEST? 

sYES BITi1 SET IN SWR, 
sCLEAR WORD ADDRESS 
sCLEAR TRACK ADDRESS 


sSET UP STACK 
sLOCK UP PROCESSOR 
sSET UP BUFFER S1ZES 


sSETUP FOR HARD ERROR 

sLOCK UP PROCESSOR PRIORITY 
sSET UP DATA BUFFERS 

9SET UP DISK ADDRESS 

sTEST FOR WRITE 

sTEST FOR WRITE CHECK 
sSETUP OUTPUT BUFFER 

sWRITE WITH INT, ENABLED 
sFIND OUT HOW TO WAIT FOR INT 
sWAIT WITH WAIT INSTRUCTION 
pWAIT IN BACKGROUND TEST 


sWAIT FOR FLAG 
sTEST FOR WRITE CHECK 
#TEST FOR READ 
sSETUP OUTPUT BUFFER 


pWRITE CHECK WITH INT, ENABLE 
sFINDOUT HOW TO WAIT FOR INT, 
sWAIT WITH WAIT INSTRUCTION 
sWAIT IN BACKGROUND TEST 


sWAIT FOR FLAG 
sTEST FOR READ 
sCHECK BUFFER 


L3 


MAINDEC#11°¢DZRFBoB 
OZRFBB,P11 


679 005366 016767 
880 005374 042767 


RFit DATA TEST REPLACES DSOA 


173512 173462 MOV 
000003 173440 Bic 


MACY11.624 6°SEP*73 14:33 PAGE 24 


INPUT, BUF 
63,FLAG 


sSETUP INPUT BUFFER 
sCLEAR RE@READ COUNT 


eee eS 


MAINDEC©11°DZRFB<B 
DZRFRB,PI1 


681 
882 
683 
6A4 
685 
886 
887 
868 
889 
890 
891 
892 
693 
894 
895 
896 
897 
698 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 


005402 
005410 
005414 
005420 
005422 
005430 
005432 
005434 
005436 
005444 
005446 
005454 
005456 
005462 
005466 
005474 
005502 
005510 
005512 
005520 
005522 
005526 
005530 
005534 
005536 
005542 
005550 
005556 
005560 


012777 
004567 
005267 
104505 
032777 
001002 
000004 
000404 
016777 
000001 
032777 
001002 
004567 
004567 
016767 
042767 
022767 
001334 
032777 
001223 
004767 
000642 
005767 
100002 
000167 
062767 
022767 
001204 
005067 


RF11 DATA TEST REPLACES DSOA 


000340 
003014 
173422 


001000 


173376 
010000 
002430 
003000 
173350 
177774 
000003 
000400 
001514 
173306 
000576 
000002 
000044 


173270 


173372 


173350 


173336 
173324 


173412 
173404 
173376 


173260 


173304 
173276 


DSKRD: 


RDWAIT: 


ELH: 


ADRD3: 


MSTR3 


MOV 
JSR 
TNC 
READ 
BIT 
BNE 
10T 
BR 
MOV 
WAIT 
BIT 
BNE 
JSR 
JSR 
MOV 
BIC 
CMP 
BNE 
BIT 
BNE 
JSR 
BR 
TST 
BPL 
JMP 
ADD 
CMP 
BNE 
CLR 


MACY11.624 6eSEP<73 


€340,@PS 
$5,ZBUF 
FLAG 

#100 
*BIT9,@SwWP 
RDWAIT 


ELH 
PRIORITY,@PS 


@BIT12,@SwR 
ADRD 

$5, COMPARE 
%5,OVRFLO 
FLAG, WORK 
@177774,WORK 
@3,WwORK 
DSKRD 
eBIT@,@SWR 
DATAT 
&7,DISBUF 
LDAT 

FLAG 

#6 

EXTPP 
@2,PATNU 
644,PATNU 
DATAT 

PATNU 


14:33 PAGE 25 


sCLEAR BUFFER 


s;READ ¢ INT ENABLE 
sFIND OUT HOW TO WAIT FOR INT, 
sWAIT WITH WAIT INSTRUCTION 


sSET UP PRIORITY 
sWAIT FOR FLAG 


sCOMPARE OUTBUFFER TO INBUFFER 
sTEST FOR EXTRA DATE BREAKS 
sCHECK DISK RE@READ COUNT 

300 3 RE*READS, 


300 ANOTHER REREAD 


3GO SET UP DISK BUFFER, 


sUNDER PROGRAM CONTROL 
sOPERATOR SELECTED PATTERN 
sINC PATTERN INDEX 


sNOT LAST PATTERN EXIT 
sLAST PATTERN EXIT 





MAINDEC #1 1eDZRFB<B RF1i DATA TEST REPLACES DSO0A MACY11.624 6°SEP-73 14:33 PAGE 26 
OZRFBB,.P11 

911 

912 ’ 

913 sTHIS IS A RANDOM DATA, RANDOM ADDRESS 

914 sAND RANDOM WORD COUNT 

915 ’ 

916 sWORD COUNT CAN BE EQUAL TO OR LESS THAN 1000 WORDS 

917 ’ 

918 005564 012767 177000 173310 RANEX: MOV #°1000,PASSC 

919 005572 012706 001000 MOV #1000,%6 

920 005576 042767 001000 173236 Bic @BIT9,FLAG 

921 005604 012767 006072 173266 MOV @RANER, HRDER 3SET UP FOR HARD ERROR 

922 005612 016777 173222 173162 MOV PRIORITY,@PS sSET PRIORITY TO LEVEL 5 

923 005620 012767 000003 173260 WRLG: MOV @3, WORK sGENERATE RANDOM WORD 

924 005626 012701 014466 - MOV eOUTBUF,%1 

925 005632 004567 002062 JSR %5, RANDOM 

926 005636 042767 177000 006622 Bic €177000,OUTBUF  ;MASK FOR WORD LENGTHsik 

927 005644 001765 BEQ WRLG 

928 005646 016767 006614 173172 MOV OUTBUF,WRDCT ;SET UP WORD COUNT 

929 005654 016767 006610 173170 MOV OUTBUF¢2,DMA 3SET UP DAR 

930 005662 066767 173160 173162 ADD WROCT,DMA 

931 005670 103753 acs WRLG 

932 005672 016767 006572 173152 MOV OUTBUF¢2,DMA 

933 005700 042767 177774 006564 Bic 0177774,OUTBUF 64 

934 005706 016767 006560 173134 MOV OUTBUF¢4,TRACK 3SET UP DAE 

935 005714 016767 173126 173164 MOV WRDCT, WORK sGENERATE RANDOM 

936 005722 012701 014466 MOV eOUTBUF,%1 sDATA BUFFER 

937 005726 004567 001766 JSR €5, RANDOM 

938 005732 012767 014466 173116 MOV sOUTBUF BUF 

939 005740 052777 000400 173046 BIS eBITs,e0Cs sCLEAR THE DISK 

940 005746 104503 WRITE 4100 sWRITE DATA 

941 005750 032777 001000 173022 BIT OBITS, @SWR 

942 005756 001002 BNE 206 

943 005760 000004 10T 

944 005762 000404 BR 2012 

945 005764 016777 173050 173010 MOV PRIORITY,@PS 

946 005772 000001 WAIT 

947 005774 104507 WRCHECK 100 sWRITE CHECK DATA 

948 005776 032777 001000 172774 BIT eBIT9,OSWR 

949 006004 001002 BNE +6 

950 006006 000004 10T 

951 006010 000404 BR 2412 

952 006012 016777 173022 172762 MOV PRIORITY, @PS 

953 006020 000001 WAIT 

954 006022 016767 173086 173026 MOV INPUT, BUF 9SET UP BUFFER 

955 006030 004567 002374 JSR e5,ZBUF sCLEAR BUFFER AREA 

956 006034 104505 READ #100 pREAD DATA 

957 006036 032777 001000 172734 BIT eBIT9,@SWR 

958 006044 001002 BNE 206 

959 006046 000004 10T 

960 006050 000404 BR o¢12 

961 006052 016777 172762 172722 MOV PRIORITY,@PS 

962 006060 000001 WAIT 

963 006062 004567 002024 JSR @5, COMPARE sCOMPARE OUT BUFFER TO IN BUFFER 

964 006066 004567 002374 JSR %5,OVRFLO sTEST FOR EXTRA DATA BREAKS 





MAINDEC?11°DZRFB-B8 RFii DATA TEST REPLACES DSOA MACY11,.624 6°SEP*°73 14:33 PAGE 27 


OZRFBB.P11 
2 
965 006072 032767 001000 172742 RANER: BIT eBIT9,FLAG sCHECK FOR ERROR 
966 006100 001430 BEQ EXRAX 
967 006102 042767 001000 172732 BIC @BIT9, FLAG 
968 006110 004567 004620 JSR &5,CONV 
969 006114 001052 DMA 
970 006116 013567 MES1 
971 006120 000006 6 
972 006122 004567 004606 JSR %5,CONV 
973 006126 001050 TRACK 
974 006130 013603 MESIA 
975 006132 000002 2 
976 006134 004567 004574 JSR %5,CONV 
977 006140 001046 ~ WROCT 
978 006142 013646 MES} 
979 006144 000004 4 
980 006146 104000 EMT+0 
981 006150 013553 HED6 
982 006152 013603 ; MESIA 
983 006154 013567 MES 
984 006156 013646 MES3 
985 006160 177777 «1 
986 006162 005267 172714 EXRAXs IWC PASSC sHAVE WE DONE IT 1000 TIMES 
987 006166 001214 BNE WRLG sBRANCH IF NO 
988 006170 032777 004000 172602 BIT OBITII-@SwWR sLOOp ON TEST 
989 006176 001402 BEO #6 sBRANCH IF YES 
990 006200 000167 177360 JuP RANEX 


CY 


MAINDEC*11-DZRF BoB 
DZRFRB,P1i1 


991 

992 

993 

994 

995 

996 

997 

996 

999 
1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
1035 
1036 
1037 
1038 
1039 
1040 
1043 
1042 
1043 
1044 


006204 
006210 
006214 
006222 
006224 
006232 
006240 
006246 
006250 
006254 
006256 
006260 
006266 
006270 
006276 
006300 
006306 
006310 
006312 
006314 
006322 
006326 
006330 
006332 
006334 
006336 
006340 


006344 
006350 
006354 
006362 
006370 
006374 
006400 
006404 
006410 
006412 
006414 
006416 
006422 
006430 
006434 


005067 
005067 
032767 
001432 
016767 
042767 
026767 
001420 
016703 
000241 
006003 
022763 
101004 
062767 
000752 
062767 
000414 
104001 
014347 
042767 
013700 
001404 
004710 
000240 
000240 
000240 
000167 


016705 
016745 
016767 
042767 
056715 
016745 
016745 
016745 
005115 
005215 
011604 
014467 
042767 
016745 
000002 


RF11 DATA TEST REPLACES DSOA 


172642 
172634 
004000 


172612 
177743 
172642 


172632 


000020 
000004 
000004 


173512 


172456 
172474 
172462 
177743 
172512 
172452 
172452 
172436 


172464 
177600 
172452 


172620 
172654 


172646 
172630 


013426 
172544 
172534 


172520 


172524 
172516 


172456 


MACY11,624 6eSEP<-73 14833 PAGE 286 


sCHECK FOR MULTI DISK MODE 
sIF IN MULTI DISK MODE REPORT "END" 


sIF LAST DISK ON SYSTEM HAS BEEN 


sEXERCISED, 

’ 

U 
CLR 
CLR 
BIT 
BEQ 

CHKDOS: MOV 
BIC 
CMP 
BEQ 
MOV 
cLc 
ROR 
CMP 
BHI 
ADD 


BR 
DRVEROKs ADD 


BR 
REPOEN: EMT 
END 
BIC 
MOV 
BEO 
LOGICAL: JSR 
NOP 
NOP 
woP 
EXTPPs JMP 


DMA 

TRACK 
@BIT11,FLAG 
REPOEN 

FLAG, WORK 
€177743,WORK 
WORK,DSKNOR 
REPOEN 

WORK ,%3 


%3 

#20, TABLE( 3) 
DRVEROK 
@4,FLAG 
CHKDOS 
@4,FLAG 
EXTPP 

o1 


0634,FLAG 
@842,%0 
ExTPeP 
%7,(0) 


ADTST 


#ARE WE IN MULTI DISK MODE 
sREPORT "END* 

sWHAT DISK ARE WE ON 

yIF LAST DISK ON SYSTEM 
sREPORT END 

sREPORT “END” LAST DISK 
sSET UP INDEX POINTER 


sWHAT IS ERROR COUNT? 
sLESS THAN 20(8)°CONTINUE 


sINC, DISK NO, 
pEXERCISE DISK 
sREPORT END OF PASS 


sWAS THIS A MONITOR LOAD? 
gNO © RECYCLE 


sRECYCLE 


5 
sENTER DISK HANDLER BY THE TRAP INSTRUCTION 
sARGUMENT TO TRAP INSTRUCTION IS TWO ORDER 


sBYTE OF THE CONTROL REGISTER, 


U 

DISK: MOV 
MOV 
MOV 
BIC 
BIS 
MoV 
MOV 
MOV 
com 
Inc 
MOV 
MOV 
Bic 
MoV 
RTI 


DBR,%&5S 
TRACK, (5S) 
FLAG, WORK 
€177743,WORK 
WORK, (5) 
DMA,°(S) 

BUF ,°(5) 
WROCT,°(S) 
($) 

(5) 

(6),%4 
@©(4),WORK 
€177600, WORK 
WORK, @(5) 


9SET UP TO LOAD DISK REG 
sLOAD TRACK NUMBER 

sSET UP DISK NO, 

sMASK FORM PROGRAM FLAG 
sLOAD UNIT INTO DAE 
sLOAD WORD ADDRESS 

sSET UP CURRENT ADDRESS 
sLOAD WORD COUNT 

9SET UP THO°S COMPLEMENT 


3 

sMASK FUNCTION BITS 
sLOAD FUNCTION REG, 
sRETURN FROM TRAP 


D1 


se 


MAINDEC*11°DZRFB<B RFit DATA TEST REPLACES DSOA MACY11.624 6°SEP<73 14333 PAGE 29 
OZRFBB,.P11 
1045 ’ 
1046 ’ 
1047 ’ 
1048 ’ 
1049 a 
1050 U 
1051 H 
1052 sRF11 DISK INTERRUPT HANDLER 
1053 sROUTINE CONTINUES ON ERRORS 
1054 U 
1055 006436 005046 DKINTs CLR. (6) sCLEAR STACK 
1056 006440 012746 006446 MOV #18,°(6) 9SET RETURN 
1057 006444 000002 RTI sCLEAR T BIT 
10568 006446 005777 172342 iss TST eocs sTEST FOR ERROR 
1059 006452 100164 BPL INTEXT 9BR IF NO ERROR, 
1060 006454 004767 004724 JSP 97, INCTAB pINC, ERROR COUNT 
1061 006460 052767 001000 172354 BIS OBIT9,FLAG #SET ERROR BIT 
1062 006466 017767 172332 172412 MOV @DAE, WORK sREPORT ERROR 
1063 006474 042767 177700 172404 Bic #177700, WORK pMASK ADDRESS EXT, BITS, 
1064 006502 004567 004226 JSR &5,CONV sCONVERT TO ASCII 
1065 006506 001106 WORK 
1066 006510 013603 MESIA 
1067 006512 000002 2 
1068 006514 104001 EMTo! 
1069 006516 013465 HED2 
1070 006520 017767 172270 172360 MOV e0CS, WORK sTEST FOR READ 
1071 006526 042767 177770 172382 Bric 6177770, WORK 
1072 006534 022767 000004 172344 CMP 64,WORK 
1073 006542 001015 BNE DELMES pIF READING REPORT WHICH READ 
1074 006544 016767 172272 172334 MoV FLAG, WORK 
1075 006552 042767 177774 172326 Bic 0177774,WORK 
1076 006560 004567 004150 JSR e5,CONV 
1077 006564 001106 WORK 
1078 006566 014017 MES13 
1079 006570 000001 1 
1060 006572 104001 EMTo! 
1081 006574 014017 MES13 


E4 





LR SSS 


MAINDEC*11°DZRFB-B RF1ii DATA TEST REPLACES DSOA MACY11.624 6°SEP*73 14:33 PAGE 30 
DZRFBB.P11 
10862 
1083 006576 017767 172220 172302 DELMES: MOV @DAR, WORK sSET UP LOWER 16 BITS OF ADDR, 
1084 006604 005367 172276 DEC WORK 
1085 006610 004567 004120 JSR 85,CONV sCONVERT TO ASCII 
1086 006614 001106 WORK 
1087 006616 013567 MES} 
1088 006620 000006 6 
1089 006622 104000 EMT+0 
1090 006624 013603 MESIA 
1091 006626 013567 MES1 
1092 006630 177777 | 
1093 006632 017767 172156 172246 MOV @D0CS, WORK sSET UP STATUS 
1094 006640 004567 004070 JSR &5,CONV 
1095 006644 001106 WORK 
1096 006646 013613 MES2 
1097 006650 000006 6 
1098 006652 104001 EMT+1 
1099 006654 013613 MES2 
1100 006656 032777 040000 172130 BIT oBIT14,e0CS +TEST FOR HARD ERROR 
1101 006664 001435 BEQ SOFTER 3GO AND CONTINUE SOFT ERROR 
1102 006666 017767 172132 172212 MOV @DAE, WORK sFETCH ERROR EXT, BITS 
1103 006674 000367 172206 SWAB WORK 
1104 006700 042767 177400 172200 BIC 6177400, WORK 
1105 006706 004567 004022 JSR 85,CONV sCONVERT TO ASCII 
1106 006712 001106 WORK 
1107 006714 013627 MES2A 
1108 006716 000003 3 
1109 006720 104000 EMT+0 
1110 006722 013534 HEDSA 
1111 006724 013627 MES2A 
1112 006726 177777 a | 
1113 006730 052777 000400 172056 BIS eBITe,eDCS sCLEAR THE DISK 
1114 006736 012706 001000 MOV #1000,%6 
1115 006742 032777 002000 172030 BIT OBITIO, @SHR sHALT ON ERROR 
1116 006750 001401 BEO 004 
1117 006752 000000 HALT sYES HALT BIT 10 SET IN SwR 
1118 006754 000177 172120 JMP @HRDER sEXIT HARD ERROR 
1119 006760 005777 172032 SOFTER: TST ewe sCHECK FOR XeFER DONE 
1120 006764 001417 BEO INTEXT sEXIT FROM ROUTINE 
1121 006766 032777 001000 172004 BIT OBITS, @SWR 
1122 006774 001402 BEO 206 
1123 006776 162716 000002 SUB 62,(6) sXeFER NOT DOWE SET UP FOR RETURN 
1124 007002 032777 002000 171770 BIT @BITI0O,@SwWR sHALT ON ERROR 
1125 007010 001401 BEQ 204 
1126 007012 000000 HALT sYES HALT BITIO SET IN SWR 
1127 007014 052777 000001 171772 BIS eBITO,eDCsS sSET GO AND CONTINUE 
1128 007022 000002 RTI sRETURN TO WAIT INSTR, 
1129 g ‘ 
1130 a 
1131 007024 032777 020000 171746 INTEXT: BIT OBIT13,@SwWR #HALT ON COMPLETION FLAG 
1132 007032 001401 BEOQ 204 
1133 007034 000000 HALT sY¥ES BIT 13 SET IN SWR HALT 
1134 007036 032777 001000 171734 BIT eBITS, @OSWR 
1135 007044 001002 BNE 006 


MAINDEC*11°DZRFB-b RF11 DATA TEST REPLACES DSOA MACY11.624 6°SEP*73 14:33 PAGE 31 
OZRFBB,P11 


1136 007046 012706 000774 MOV 0774,%6 sRESET STACK 
1137 007052 000002 RTI sEXIT 





—_—_—____— SSS sess 
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OZRFBB,P11 

1138 

1139 3 

1140 ’ 

1141 5 

1142 5 

1143 sROUTINE TO SET UP DAR AND DAE 

1144 sFROM SWR AND CONVERSATION 

1145 sENTER FROM JSR %5,OPDSEL 

1146 007054 032777 000200 171716 OPDSEL: BIT OBIT7?,eSWk sD0ES SWR CONTAIN TRACK ® 

1147 007062 001001 BNE 004 

1148 007064 000205 RTS es 

1149 007066 017767 171706 172012 MOV @SWR, WORK sFETCH SWR 

1150 007074 006067 172006 ROR WORK 

1151 007100 006067 172002 ROR WORK 

1152 007104 006067 171776 ROR WORK 

1153 007110 006067 171772 ROR WORK 

1154 007114 006067 171766 ROR WORK 

1155 007120 042767 177774 171760 Bic 6177774,WORK sMASK AIGL ORDER 2 BITS 

1156 007126 016767 171754 171714 MOV WORK, TRACK 

1157 007134 017767 171640 171744 MOV @SWR, WORK 

1158 007142 006167 171740 ROL WORK 

1159 007146 006167 171734 ROL WORK 

1160 007152 006167 171730 ROL WORK 

1161 007156 006167 171724 ROL WORK 

1162 007162 006167 171720 ROL WORK 

1163 007166 006167 171714 ROL WORK 

1164 007172 006167 171710 ROL WORK 

1165 007176 006167 171704 ROL WORK 

1166 007202 006167 171700 ROL WORK 

1167 007206 006167 171674 ROL WORK 

1168 007212 006167 171670 ROL WORK 

1169 007216 042767 003777 171662 Bic 6003777, WORK 

1170 007224 042767 174000 171620 Bic #174000,DMA 

1171 007232 066767 171680 171612 ADD WORK,DMA sSET UP LOWER 16 BITS OF ADORESS 


1172 007240 000205 RTS 5 sEXIT 





MAINDEC 11 °DZRFB<B 
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1173 
1174 
1175 
1176 
1177 
1178 
1179 
1180 
1161 
1182 
1183 
1184 
1185 
1186 
1187 
1188 
1189 
1190 
1191 
1192 
1193 
1194 
1195 
1196 
1197 
1198 
1199 
1200 
12013 
1202 
1203 
1204 
1205 
1206 
1207 
1208 
1209 
1210 
1211 
1212 
1213 


007242 
007250 
007252 
007256 
007264 
007266 


007274 
007302 
007310 
007316 
007324 
007332 
007340 
007346 
007350 
007354 
007356 
007362 
007366 
007374 
007400 
007406 
007410 
007416 
007424 
007426 
007434 
007442 
007444 
007452 
007460 
007464 
007470 
007476 
007504 
007512 
007520 
007522 
007524 
007530 
007532 
007534 
007536 
007542 
007544 
007546 
007550 


066767 
103002 
005267 
026777 
001403 
052767 


017767 
042767 
016767 
042767 
066767 
042767 
026767 
001066 
105767 
100015 
005067 
005067 
042767 
062716 
016767 
000445 
042767 
022767 
001021 
017767 
066767 
103012 
052767 
017767 
005167 
005267 
017767 
042767 
017767 
032767 
001001 
000207 
004567 
001052 
013567 
000006 
004567 
001310 
013603 
000002 
104000 


RF11 DATA TEST REPLACES DSOA 


171600 


171572 
171570 


171524 
177740 
171526 
177743 
171520 
177740 
171542 


171466 


171470 
171462 
000200 
000002 
171460 


177774 
000003 


171370 
171406 


000200 
171344 
171362 
171356 
171330 
177774 
171312 
000100 


003172 


171602 


171536 
171546 


171606 
171600 
171570 
171562 
171554 
171546 
171542 


171446 
171440 


171472 
171464 


171452 
171444 


171370 
171366 


171352 
171344 
171340 
171322 


3 
sROUTINE TO SETUP DISK BUFFERS 
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sADD WORD COUNT TO STARTING DISK ADDRESSES 
sCOMPARE CALCULATED ADDRESS TO TERMINATING ADDRESS 


z 

DISBUF: ADD 
Bcc 
tNnc 

COMDAR: CMP 
BEQ 
BIS 


U 

CMDAEs MOV 
BIC 
MOV 
BIC 
ADD 
Bic 
CMP 
BNE 
TSTB 
BPL 


EXTCME: BIC 


AKHs MOV 


EXTOR: RTS 
ERADR: JSR 


WRDCT,DMA 
COMDAR 
TRACK 

DMA, @DAR 
CMDAE 
@BIT6,FLAG 


@DAE,wWORKi 
€177740,WORKi 
FLAG, WORK 
0€177743,WORK 
TRACK, WORK 
6177740, WORK 
WORK, WORK, 
ERADR 

FLAG 

EXTCME 

DMA 

TRACK 
@€200.FLAG 
@2,(6) 
SWROCT,WRDCT 
EXTOR 
0177774,WORK) 
@3,WORK, 

AKH 

@DAR, WORK 
WROCT, WORK 
AKH 

@200, FLAG 
@DAR,WRDCT 
WRDCT 

WROCT 

@DAE, TRACK 
0177774, TRACK 
@DAR,DMA 
@BIT6, FLAG 
204 

Rg? 

95 ,CONV 


85,CONV 


o0 


sADD WORD COUNT TO LOWER 16 BITS 


sOVERFLOW ADD ONE TO TRACK 
sCOMPARE LOWER 16 BITS 


sFETCH EXT, ADDR BITS 
sMASK TRACK AND DISK ADDR 
+SET UP DISK ADDRESS 


sARE THEY EQUAL 
sERROR IN DAE REG 
pCHECK FOR LAST DISK BUFFER 


sCLEAR LOWER 16 BITS 
sCLEAR EXT, ADDR, BITS, 


sINC STOCK POINTER 


sEXIT 

sMASK EXT, TRACK BITS 

sCOMPARE FOR LAST TRACK 

sNOT LAST TRACK EXIT 

sFETCH LOWER 16 BITS OF ADDRESS 
sWILL DISK OVERFLOW 


sOISK WILL OVERFLOW 
sSET UP NEW WORD COUNT 
sMAKE TwO°S COMP, 


pMASK TRACK BITS 
sLOWER 16 BITS OF ADDRESS 
sREPORT ADDRESS ERROR 


sEXIT 
sCONVERT DMA REG COUNT TO ASCII 


sCONVERT TRACK REG COUNT TO ASCII 


sREPORT ERROR ‘ 


+4 


MAINDEC*11°DZRFB=B 
OZRFBB,P11 


1227 
1228 
1229 
1230 
1231 
1232 
1233 
1234 
1235 
1236 
1237 
1238 


007552 
007554 
007556 
007560 
007562 
007566 
007574 
007600 
007604 
007612 
007614 
007616 


013516 
013603 
013567 
1777977 
004767 
042767 
005067 
005067 
032777 
001401 
000000 
000207 


RF11 DATA TEST REPLACES DSOA 


003616 
000100 
171252 
171244 
002000 


171246 


171166 


HED4 
MESIA 
MES) 
*1 
JSR 
BIC 
CLR 
CLR 
RIT 
BEQ 
HALT 
RTS 
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87, INCTAB 
@BIT6,FLAG 
DMA 


TRACK 
@BIT10,@SwR 
204 


7 


sINC ERROR COUNT 

sDISK ADDRESS ERROR RE@START PRUG, 
sHALT ON ERROR 

sSWITCH 10 SET IN SwR HALT 


~ 


MAINDEC*11°DZRFB-B 
DOZRFBB,P11 


1239 
1240 
1241 
1242 
1243 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
1252 
1253 
1254 
1255 
1256 
1287 
1258 
1259 
1260 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
12686 
1269 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
1278 
1279 
1280 
1261 
1282 
1283 
1284 
12865 
1286 
1287 
12868 
1289 
1290 
1291 
1292 


007620 
007626 
007632 
007636 
007640 
007642 
007644 
007646 
007680 
007652 
007654 
007660 
007666 
007672 
007676 
007700 
007704 
007710 
007714 
007716 


007720 
007724 
007730 
007734 
007736 
007740 
007742 
007744 
007746 
007750 
007754 
007756 
007762 
007764 
007770 
007772 


016767 
006067 
004567 
013014 
014401 
000002 
104000 
014405 
014401 
177777 
016700 
016767 
012703 
022700 
001410 
016021 
005367 
005767 
001371 
000205 


016700 
016704 
012703 
005002 
006300 
006104 
006102 
005303 
001373 
066700 
005504 
066704 
005502 
062700 
005504 
005502 


RF1i1 DATA TEST REPLACES DSOA 


171230 003166 


003162 
003076 


171174 
171162 
014466 
000042 


171176 
171172 


000120 
000116 
000007 


000070 
000064 
001057 


171220 
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’ 
sENTER FROM JSR 85 PASEL 


2 
PASEL3 


FILDATs 


SHIFTs 


MOV 
ROR 
JSR 
ACNVX 
PATMES 
2 
EMToO 
PATHED 
PATMES 
bd | 

MOV 
MOV 
“OV 
CMP 
BEO 
MOV 
DEC 
TsTt 
BNE 
RTS 


DATA 


PATNU,ACNVX 


ACNVX 
@5,CONV 


PATNU,%0 


WRDCT, WORK 
eOUTBUF,%1 


042,%0 
RANDOM 


PATOCO).C1)d¢ 


WORK 
WORK 
FILDAT 
85 


ROUTINE TO SELECT DATA PATTERNS FOR TEST 


+SET UP PATTERN NUMBER 


‘sNORMALIZE 


sCONVERT TO ASCIT 


sPRINT CURRENT PATTERN 


sSET UP WORK 

sLOC, OF OUTBUFFER 

sTEST FOR RANDOM DATA NUMBER 
3GO GENERATE RANDOM DATA 
sFILL BUFFER 

sDEC, WORK COUNT 

sTEST FOR LAST WORK 

sLOAD WEXT WORD 

sBUFFER FULL 


DATA GENERATOR SUBROUTINE 


MOV 


LONUM,%0 
HINUM,%4 
07,%3 


84 
HINUM, 04 


%2 
01057,%0 
$4 
%2 


9SET UP RO WITH S DIGITS LOW 
sSET UP Ri WITH S DIGITS HIGH 
9SET UP SHIFT COUNT 

sCLEAR R2 

sSHIFT RO LEFT AND 

pROTATE CARRY INTO LSB OF RY INTO 
pROTATE CARRY OUT OF Ri INTO R2 
pDECREMENT R3 

sCONTINUE SHIFT LOOP 

pADDN IN NUMBER TO MAKE X 129 
sPROPOGATE CARRY 

pADON IN NUMBER TO MAKE X 129 
sPROPOGATE CARRY 

sADON LOW CONSTANT 

sPROPOGATE CARRIES 

pPROPOGATE AGAN 


¥Y 


——_— LL Se 
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OZRFBB,P1i1 
1293 007774 062704 047401 aDD 047401,94 sADDN HIGH CONSTANT 
1294 010000 005502 aoc e2 #PROPOGATE CARRY 
1295 010002 062702 000006 AbD 66%2 sADDN HIGHEST CONSTANT 
1296 010006 060200 ADD %2,%0 sREPRIME RO WITH HIGH DIGIT 
1297 010010 005504 ape $4 sPROPOGATE CARRY 
1298 010012 010067 000026 MOV %0,LONUM #PUT RO BACK IN LONUM 
1299 
1300 010016 010021 MOV 80,C1i)¢ HOLD LONUM FOR PROGRAM 
1301 010020 005367 171062 ; DEC WORK 
1302 010024 001406 BEQ EXGEN 
1303 010026 010467 000014 MOV @4,HINUM sPUT Ri BACK IN HINUM 
1304 010032 010421 MoV Q4,C1)¢ sHOLD HINUM FOR PROGRAM 
1305 010034 005367 171046 DEC WORK 
1306 010040 001327 BNE RANDOM 
1307 010042 000205 EXGEN: RTS $5 sRETURN T PROGRAM 
1308 010044 000000 LONUMs 0 
1309 010046 000000 HINUMs 0 
1310 g 
1311 ’ 
1312 ] 
1313 3 
1314 q 
1315 8 
1316 ’ 
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1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 
1334 
1335 
1336 
1337 
1338 
1339 
1346 
1341 
1342 
1343 
1344 
1345 
1346 
1347 
1348 
1349 
1350 
1351 
1352 
1353 
1354 
1355 
1356 
1357 
1356 
1359 
1360 
1363 
1362 


010050 
010052 
010054 
010056 
010060 
010062 
010064 
010066 
010070 
010072 
010074 
010076 
010100 
010102 
010104 
010106 
010110 


010112 
010116 
010124 
010132 
010140 
010142 
010146 
010154 
010156 
010164 
010172 
010174 


000000 
1797777 
134510 
043267 
100000 
107070 
070707 
052525 
125252 
177737 
004102 
136363 
063636 
000001 
100005 
000520 
030303 


005067 
012767 
016767 
027777 
001016 
005267 
026767 
001407 
062767 
062767 
000757 
000205 


RFij DATA TEST REPLACES DSOA 


170774 
014466 
170754 
170732 


170744 
170674 


170744 
170740 
170732 


170736 


170704 
170700 


eo EVEN 
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’ 
gRF11 DATA PATTERNS 


U 

PATOs 0 
PATis 177777 
PAT28 134510 
PAT33 043267 
PAT43 100000 
PATS: 107070 
PAT6s 070707 
PAT73 052525 
PATIOs 125252 
PATiis 177737 
PATi2: 004102 
PATiI3s 136363 
PATI4s 063636 
PATIS: 000001 
PATI6s 100005 
PAT173 000520 
PAT203 030303 


9PAT21 RANDOM DATA 


6 

sDATA COMPARISON ROUTINE 
sIF AN ERROR OCCURS BETWEEN THE OUT@BUFFER AND 
sTHE IN@BUFFER AN ERROR WILL BE REPORTED IN THE 
SFOLLOWING MANNER 
gDATA ERROR XX DAE XXXXXX DAR XXXXXX GOOD DATA XAXXXXX BAD DATA 


¥ 
COMPARE 8CLR 
MOV 
MOV 
WROCMP: CHP 
BNE 
WRDINCs INC 
CMP 
BEG 
ADD 
ADD 
BR 
ADAM: RTS 


WORK2 
COUTBUF , SAVE 
INPUT, SaVi 
OSAVE, @SAVi 
WOERR 

WORK? 
WRDOCT, WORK? 
ADAM 
@2,SAVE 
@2,S5AV1i 
WRDCMP 

aS 


swORD COUNT 

sSET UP OUTBUFFER POINTER 
sSET UP IN BUFFER POINTER 
sCOMPARE BUFFERS 

sWORD IN ERROR 

901 WORD COUNT 

91S COMPLETE BUFFER CHECKED 
sEXIT ROUTINE 


sCOMPARE NEXT WORD 
sEXIT THIS ROUTINE 


my 
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1363 
1364 
1365 
1366 
1367 
1368 
1369 
1370 
1371 
1372 
1373 
1374 
1375 
1376 
1377 
1378 
1379 
1380 
1361 
1382 
1383 
1384 
1385 
1386 
1387 
1368 
1389 
1390 
1391 
1392 
1393 
1394 
1395 
1396 
1397 
1398 
1399 
1400 
1401 
1402 
1403 
1404 
1405 
1406 
1407 
1408 
1409 
1410 
1411 
1412 
1413 
1414 
1415 


010176 
010204 
010210 
010216 
010224 
010232 
010234 
010240 
010246 
010254 
010262 
010266 
010270 
010272 
010274 
010300 
010302 
010304 
010306 
010314 
010320 
010322 
010324 
010326 
010334 
010340 
010342 
010344 
010346 
010354 
010362 
010366 
010370 
010372 
010374 
010376 
010400 
010402 
010404 
010406 
010410 
010412 
010414 
010422 
010424 
010426 


052767 
004767 
016767 
016767 
066767 
103002 
005267 
016767 
042767 
056767 
004567 
001106 
013567 
000006 
004567 
001110 
013603 
000002 
017767 
004567 
001106 
013704 
000006 
017767 
004567 
001106 
013724 
000006 
016767 
042767 
004567 
001106 
014017 
000001 
104000 
013452 
014017 
013603 
013567 
013704 
013724 
177777 
032777 
001401 
000000 
000645 


RFi1 DATA TEST REPLACES DSOA 


001000 
003174 
170636 
170626 
170662 


170650 
170576 
177743 
170634 
002446 


002434 


170556 
002414 


170540 
002374 


170470 
177774 
002346 


002000 


170636 


170670 
170664 
170654 


179646 


170640 


170626 


170572 


170552 


170532 
170524 


170356 


WDERR?: 


MACY11,624 


*BIT9,FLAG 
%&7,INCTAB 
DMA, WORK 
TRACK, WORK{ 
WORK2, WORK 
06 

WORK! 

FLAG, WORK 3 
0177743,WORK3 
WORK3, WORK { 
%5,CONV 


$5,CONV 


@SAVE, WORK 
&5-CONV 


@SAV1,WORK 
&5,CONV 


FLAG, WORK 
€177774,WORK 
%5,CONV 


+0 


@BITIO,@SwR 
204 


WRDIWC 


6°SEPo73 


14:33 


PAGE 38 


3SET ERROR BIT 

sINC, ERROR COUNT 

sFETCH STARTING DISK ADLR 
: 

CALCULATE FAILING ADDR 
$SHUULD DAE RE INCREMENTED 


sCONVERT WORD ADDR TO ASCII 


sCONVERT TRACK ADDR TO ASCII 


sFETCH GOOD DATA 
sCONVERT GOOD DATA TO ASCII 


sFETCH BAD DATA 
sCONVERT TO ASCII 


sWHICH READ THE 
sERROR OCCURRED ON 


sPRINT MESSAGE 


sHALT ON ERKOR 


sYES HALT BIT 10 SET IN SWR 
9GO COMPARE NEXT WORD 
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1416 
1417 
1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1446 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 


010430 
010434 
010442 
010446 
010452 
010456 
010460 
010462 
010464 


010466 
010472 
010474 
010500 
010506 
010512 
010520 
010524 
010526 
010530 
010532 
010534 
010542 
010546 
010554 
010560 
010562 
010564 
010566 
010572 
010600 
010606 
010612 
010614 
010616 
010620 
010622 
010624 
010626 
010630 
010632 


016704 
016767 
006167 
060467 
020467 
001001 
000205 
005024 
000772 


016704 
006104 
066704 
016767 
006167 
066767 
020467 
0010013 
000205 
005724 
001772 
052767 
010467 
162767 
004567 
013014 
013663 
000006 
010467 
162767 
017767 
004567 
013014 
013724 
000006 
104000 
013502 
013663 
013724 
177779 
000732 


RFii DATA TEST REPLACES DSOA 


170450 
170424 
170446 
170442 
170436 


170354 


170404 
170360 
170402 
170366 
170370 


001000 
002246 
000002 
002154 


170452 


170406 
170374 


170300 
002240 


002214 
002206 
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’ 
sROUTINE TO ZERO DATA INPUT BUFFER 
sZERO BUFFER BEFORE READING 


5 

ZBUF 8 MOV 
MOV 
ROL 
ADD 

NZUF 3 CMP 
BNE 
RTS 

CLEAR: CLR 
BR 


INPUT, %4 
SWRDCT, WORK 
WORK3 

$4, WORK} 

&4, WORK} 
CLEAR 


sFETCH START OF INBUFFEP 


s1S ROUTINE COMP, 
sZERO NEXT WORD 
sEXIT ROUTINE 
sCLEAR THE WORD 


tROUTINE TO TEST FOR ADDITIONAL DATA TRANSFERS 


sANY DATA TRANSFERRED AFTER WORD COUNT OVERFLOW IS AN ERROR 


5 
5 
OVRFLO: MOV 


CHWRDs CMP 


CKNEX; TST 


WROCT,%4 

04 

INPUT,€4 
SWROCT, WORK} 
WORK3 
INPUT, WORK} 
@4,WORK3 
CKNEX 

$s 

(4)¢ 

CHWRD 
@BIT9, FLAG 
94, ACNVX 
@2,ACNVX 
@5,CONV 


%4,ACNVX 
@2,ACNVX 
@ACNVX,ACNVX 
@5,CONV 


00 


CHWRD 


sADD wORD COUNT 


:18 TEST COMPLETE 
sCHECK NEXT WORD 
sTEST 18 COMPLETE 
sTEST FOR ZERO WORD 
sWORD IS ZERO 

sSET ERROR BIT 


sCONVERT 4 OCTAL TO ASCII 
s ADDRESS 


sCONVERT OCTAL TO ASCII 
sDATA 


sCALL TYPE OUT ROUTINE 


sFETCH NEXT WORD 


p 


A“ 
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1470 
1471 
1472 
1473 
1474 
1475 





MAINDEC*11°DZRFB-B 
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1476 
1477 
1478 
1479 
1460 
1461 
1482 
1483 
1484 
1485 
1486 
1487 
14886 
1489 
1490 
1491 
1492 
1493 
1494 
1495 
1496 
1497 
1498 
1499 
1500 
1501 
1502 
1503 
1504 
1505 
1506 
1507 
15086 
1509 
1510 
1511 
1512 
1513 


010634 
010642 
010650 
010652 
010654 
010662 
010670 
010672 
010700 
010706 
010714 
010720 
010726 
010730 
010736 
010740 
010746 


010750 
010756 
010764 
010770 
010774 
011002 
011006 
011014 
011022 
011026 
011034 
011042 
011050 


052777 
013767 
001410 
100432 
162767 
022767 
100432 
012767 
012767 
012767 
005777 
022767 
001410 
062767 
000766 
162767 
000403 


162767 
012767 
005067 
012706 
162767 
006067 
042767 
016767 
006067 
016767 
012767 
066767 
000205 


RF11 DATA TEST REPLACES DSOA 


000400 
000042 


000020 
014466 


010750 
000340 
017446 
170150 
177446 


020000 
000006 
167016 
000776 
014466 
170062 
000001 
170050 
170036 
170032 
014466 
170022 


170152 
170220 


170206 
170200 
167104 
167100 
170154 
170142 
170132 


170122 


170112 
167020 


170066 


170054 
170042 


170012 
170042 
170034 
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sEXTENDED MEMORY EXERCISER 
sTHE PROGRAM DETERMINES HOW MUCH MEMORY 
91S ON THE SYSTEM THEN IT 


u 

EXTMEN: BIS 
MOV 
BEQ 
BMI 
SUB 
CMP 
BMI 

iss MOV 
MOV 
MOV 

EXREFs: TST 
CMP 
BEQ 
ADD 
BR 

LGMEMs SUB 
BR 


’ 
sENTER HERE 


U 

MAXREFs SUB 

GOTMEM: MOV 
CL 
MOV 
SUB 
ROR 
Bic 
MOV 
ROR 
MOV 
MOV 
ADD 
RTS 


eBITé,eocs sCLEAR THE DISK 

@042,SAVE sGET MONITOR ADDRESS 

is sSKIP IF 0 

LGMEM GREATER THAN 16K 

@20,SAVE sDEC IT 

@OUTBUF, SAVE s1S IT ACT il 

GOTMEM 7NO © SKIP 

@MAXREF,4 #SET UP 1/0 BUS TRAP 

€340.6 

€17446,SAVE 3SET UP FOR 4K 

@SAVE sREFERENCE MEMORY 
€177446,SAVE #TEST FOR GREATER THAN 26K 
MAXREF sLAST REFERENCE MADE TO 1/0 REG, 
#20000,SAVE 3SET UP FOR NEXT MEMORY REF, 
EXREF 3GO REFERENCE MEMORY 
@20,SAVE 3DEC IT 

GOTMEM 


WHEN I70 BUS ERROR OCCURS 


@20000,-SAVE 

06.4 sRESTORE 1/0 BUS TRAP 
6 

67765%6 

@OUTBUF, SAVE sSET UP NEW WORD COUNT 
SAVE 

@BITO, SAVE 

SAVE, SWROCT 

Swroct 

SWRDCT,WROCT 

sOUTBUF, INPUT 

SAVE, INPUT 

85 


-_ 
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1514 
1515 
1516 
1517 
1518 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
1526 
1527 
15286 
1529 
1530 
1531 
1532 
1533 
1534 
1535 
1536 
1537 
1536 
1539 
1540 
1541 
1542 
1543 
1544 
1545 


011052 
011060 
011064 
011072 
011100 
011104 
011112 
011114 
011116 
011124 
011130 
011134 
011136 
011142 
011146 
011152 
011154 
011160 
011162 


011164 
011166 
011172 
011174 
011176 
011200 


012767 
005067 
012767 
012737 
006727 
012767 
000401 
022626 
012737 
012746 
012746 
000002 
005027 
005267 
105767 
100373 
005267 
001401 
000765 


005046 
012746 
000002 
104001 
014027 
000000 
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011202 
166732 
177000 
011114 
000000 
000006 


000012 
000020 
011136 


000000 
177772 
177766 


167714 


011174 


166734 


170002 
000010 


000070 


3 
sBACKGROUND TEST FOR INTERRUPTS 


’ 
XWAIT: MOV @RTIX,14 $SET UP TRACE TRAP 
CLR 16 
MOV #°1000,PASS 9SET UP TIME BASE 
MOV #16,0810 sSET ILLEGAL INST 
SXxT #0 #TEST FOR 11/745 
MOV #6,RTIX sMAKE IT AN RTT 
BR 28 sSKIP JUNK 
18s cmMP (6)4-(6)¢ 9CLEAR STACK 
28% MOV €12,@810 sRESET 1/0 
MOV eBIT4,°(6) 3SET TRACE TRAP BIT 
MOV @,%6.°(6) 
RTI sRETURNS TO NEXT LOCATION EITH T BIT SET 
CLR #0 
XINCWs INC XINCWe2 
TSTB XINCWe2 
BPL XINCW 
Inc PASS 
BEQ 704 
BR XINCWo4 
sREPORT BACKGROUND TEST TIMED OUT 
CLR (6) sCLEAR PS ON STACK 
MOV @16,°(6) 
RTI 3SET RETURN 
iss EMTo1 sCLEAR TRACE BIT 
TIMO 
HALT 
’ 
RTIXs RTI 


ae 
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1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1556 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1576 
1579 
1580 
1581 
1582 
1583 
1584 
1585 
1586 
1587 
1566 
1589 
1590 
1591 
1592 
1593 
1594 


011204 
011210 
011214 
011222 
011226 
011232 
011240 
011246 
011254 
011256 
011264 
011266 
011270 
011272 
011300 
011302 
011306 
011310 


011312 
011320 
011324 
011330 
011336 
011340 
011346 
011350 
011352 
011354 
011362 
011364 
011370 
011372 


012706 
004767 
052777 
005067 
005067 
012767 
012767 
012767 
104503 
032777 
001002 
000004 
000404 
016777 
000001 
004767 
000762 
000741 


052777 
005067 
005067 
012767 
104507 
032777 
001002 
000004 
000404 
016777 
000001 
004767 
000762 
000167 
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001000 
000406 
000400 
167624 
167616 
011214 
011376 
000340 


167542 
175734 


000400 
167526 
167520 
011312 


167460 
175652 
177616 


167572 


167640 
166556 
166552 


167514 


167502 


167474 


167542 
167432 


167420 


sRF11 POWER FAIL TEST “1 


a DISK ZERO 
’ WRITE COMPLETE DISK WITH 125252 PATTERN 
3 REPORT "OK* 


SSTART WRITING THE SAME PATTERN 
sWHEN POWER FATL OCCURS ABORT TRANSFER 
sSETUP NEW ENTRY POINT AND HALT 


U 
sPOWER UP AND WRITE CHECK THE DISK FOR ERRORS 


U 
s@@CONLY ONE ERROR IS CONSIDERED ACCEPTABLEeee 
5 


g 
PFTis MOV €1000,%6 sSET UP STACK 
JSR %7,POWFAL sWRITE 125252 ON DISK 
PFWATs: BIS eBITée,e0CS sCLEAR DISK 
CLR DMA 
CLR TRACK 
MOV @PFWAT,HRDER 3SET UP FOR HARD ERROR 
MOV @DOWN, 24 sSET UP POWER FAIL VEC, 
MOV 3340.26 
MYBYWR: WRITE #100 
BIT @BIT9,@SWR 
BNE 0%6 
10T 
BR e412 
MOV PRIORITY,@PS 
WAIT 
JSR @7,O0ISBuUF 9SET UP NEW DISK BUFFER 
BR MYBYWR 
BR PFWAT 
sROUTINE TO CHECK DATA AFTER POWER FAIL 
$ 
UpPCHKs B18 eBITé,epdcs sCLEAR THE DISK 
CLR DMA 
CLR TRACK 
MOV @UPCHK, HRDER 3SET UP FOR HARD ERKOR 
CHKDATs WRCHECK #100 
BIT eBIT9,@SwrR 
BNE 2%6 
IoTt 
BR e012 
MOV PRIORITY,@PS 
WAIT 
JSR a7, DISBUF 9SET UP NEW DISK BUFFER 
BR CHKDAT 
JMP PFWAT 9GO WAIT FOR ANOTHER 


sPOWER FAIL 





fF? 
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1595 
1596 
1597 
1598 
1599 
1600 
1601 
1602 
1603 
1604 
1605 
1606 
1607 
1608 
1609 
1610 
1613 
1612 
1613 
1614 
1615 
1616 
1617 
1618 
1619 
1620 
1621 
1622 
1623 
1624 
1625 
1626 
1627 
1626 
1629 
1630 
1631 
1632 
1633 
1634 
1635 
1636 
1637 
16386 
1639 
1640 
1641 
1642 
1643 
1644 
1645 
1646 


011376 
011404 
011412 


011414 
011422 
011426 
011430 
011432 
011436 


011442 
011446 
011452 
011456 
011462 
011470 
011476 
011504 
011506 
011514 
011516 
011520 
011522 
011530 
011532 
011536 
011540 


052777 
012767 
000000 


012767 
012706 
104001 
014325 
004767 
000167 


012706 
004767 
005067 
005067 
012767 
012767 
012767 
104507 
032777 
001002 
000004 
000404 
016777 
000001 
004767 
000762 
000744 


RFii DATA TEST REPLACES DSOA 


000400 
011414 


011376 
001000 


000142 
177650 


001000 
000150 
167374 
167366 
011452 
011542 
000340 


167312 
175504 


167410 
166412 


166402 


167410 
166326 
166322 


167264 


167252 


MACY11.624 


3 
sPOWER DOWN ROUTINE 


sABORT DISK AND 
’ 


a 

DOWN: BIS 
MoV 
HALT 


f 

UP? MOV 
“MOV 
EmTeoi 
PRE 
JSR 
JMP 


MALT 


@BIT6,@DCS 
@UP,24 


@DOWN, 24 
#@1000,%6 


%7,DELAY 
UPCHK 


sPOWER FAIL TEST 62 


6°SEP<-73 14:33 PAGE 44 


sABORT DISK 
sSET POWER FAIL VECTOR 


1GO CHECK DISK 


sWRITE COMPLETE DISK WITH 125252 PATTERN 


sREPORT “OK® 


sWRITE CHECK DISK AND WAIT FOR POWER FAIL 

sWHEN POWER COMES BACK WRITE CHECK DISK AGAIN 
sAND CHECK FOR ERRORS 
s@@@NO ERRORS SHOULD OCCUR, ee 


8 
9D0 NOT CREATE ANOTHER POWER FAIL UNTIL 
sTHE ADDRESS REGISTER HAS COMPLETELY CYCLED 


s THROUGH, 


a 

PFT2: MOV 
JSR 

PWRFLs CLR 
CLR 
MOV 
MOV 
MOV 

CHKDSKs: WRCHECK 
BIT 
BNE 
1oTf 
BR 
MOV 
WAIT 
JSR 
BR 
BR 


€1000,%6 
07,POWFAL 
DMA 

TRACK 
@PWRFL,HRDER 
@PWRON,24 
€340,26 

#100 
OBIT9,@SwR 
206 


012 


sSET UP STACK 
sWRITE 125252 ON DISK 


sSET UP HARD ERROR 
sSET UP POWER FAIL VEC, 


sWAIT IN BACKGROUND 


PRIORITY, @PS 


&7,D01S8uUF 
CHKDSK 
PWRFL 


sCHECK NEXT BUFFER 
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1647 
1648 ’ 
1649 PROUTINE TO ABORT DISK DURING POWER FAIL 
1650 ’ 
1651 011542 052777 000400 167244 PWRDN: BIS eBITe,e0Cs 1CLEAR THE DISK 
1652 011550 012767 011560 166246 MOV #PWRUP, 24 1SET UP RESTART 
1653 011556 000000 HALT 
1654 ; 
1655 011560 012767 011542 166236 PwRUP: MOV OPWRDN, 24 PRESET POWER FAIL VECTOR 
1656 011566 012706 001000 “ov #1000,%6 
1657 011572 004767 000002 sR 87, DELAY 
1658 011576 000725 BR PWRFL 1GO CHECK DISK 
1659 ’ 
1660 ’ 
1661 011600 012700 177633 DELAY: MOV 9°145,%0 
1662 011604 005002 CLR 82 
1663 011606 000005 183 RESET 
1664 011610 005202 As 82 
1665 011612 001375 BNE 18 
1666 011614 005200 INC 80 
1667 011616 001373 BNE 18 
1668 011620 000207 RTS 7 
1669 ' 
1670 ’ 
1671 ’ 
1672 PROUTINE TO WRITE THE COMPLETE DISK 
1673 sWITH 125252 PATTERN 
1674 SWRITE CHECK AND REPORT ERRORS IF THEY 
1675 OCCUR 
1676 PREPORT OK" AT COMPLETION 
1677 011622 052777 000400 167164 POWFAL: BIS *BITS,e0CS ICLEAR THE DISK 
1678 011630 011667 167246 mov (6), PASSC 
1679 011634 012706 001000 MOV #1000,%6 
1680 011640 012767 000020 167206 MOV $20,PATNU 1SET UP PATTERN 
1681 011646 005067 167200 CLR DMA 
1682 011652 005067 167172 CLR TRACK 
1683 011656 012767 002000 167200 MoV 82000,SWRDCT = sSETUP WORD COUNT 
1684 011664 016767 167174 167154 MOV SWROCT.WROCT 
1685 011672 004567 175722 JSR &5,PASEL sGENERATE DATA BUFFER 
1686 011676 012767 014466 167152 MOV sOUTBUF BUF 1SET UP CURRENT ADDRESS 
1687 011704 012767 011622 167166 MOV #POWFAL, HRDER 
1688 011712 104503 WRONWs WRITE 4100 
1689 011714 032777 001000 167056 BIT 9BIT9, OSWR sCHECK ON HOW TO WAIT 
1690 011722 001002 BNE +6 
1691 011724 000004 10T »BACKGROUND TEST 
1692 011726 000404 BR 2012 
1693 011730 016777 167104 167044 MOV PRIORITY, @PS 
1694 011736 000001 WAIT 
1695 011740 104507 WRCHECK #100 
1696 011742 032777 001000 167030 BIT oBIT9,@SWR ’ 
1697 011750 001002 BNE +6 
1698 011752 000004 10T 
1699 011754 000404 BR 0412 
1700 011756 016777 167086 167016 MOV PRIORITY, @PS 


Hartenstein a ett et ee etm che atemetetstanirerceestot de 
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1701 
1702 
1703 
1704 
1705 
1706 


011764 
011766 
011772 
011774 
011776 
012000 


000001 
004767 
000747 
104001 
014055 
000177 


RFii DATA TEST REPLACES DSOA 


175250 


167076 


MACY11.624 


&7,D1SB8UF 
WRDNW 
+1 


@PASSC 


6°SEP*73 14833 PAGE 46 


9SET UP NEW DISK BUFFER 
sWRITE NEW BUFFER 
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1707 
1708 
1709 
1710 
1711 
1712 
1713 
1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1723 
1724 
1725 
1726 
1727 
1728 
1729 
1730 
1731 
1732 
1733 
1734 
1735 
1736 
1737 
1738 
1739 
1740 
1741 
1742 
1743 
1744 
1745 
1746 
1747 
1748 
1749 
1750 
1751 
1752 
1753 
1754 
1755 


012004 
012012 


012014 
012022 


012024 
012032 


012034 
012042 


012044 
012052 


012054 
012060 
012062 
012064 


012066 
012074 
012102 
012110 
012116 
012124 
012126 
012132 
012134 


017777 
000774 


017777 
000774 


017777 
000774 


017777 
000774 


017777 
000774 


017700 
000005 
000005 
000773 


012777 
012777 
012777 
017777 
032777 
001760 
105777 
100375 
000754 


RFii DATA TEST 


166770 


166760 


4 


166750 


166740 


166730 


166752 


000340 
177777 
014466 
166664 
000001 


166662 


167004 


166776 


166770 


166762 


166754 


166706 
166714 
166710 
166676 
166670 





REPLACES DSOA MACY11,624 6°SEP*73 14833 PAGE 47 


sROUTINE TO ALLOW THE OPERATOR 10 SET BITS 
$IN THE 170 REGISTERS VIA THE SWITCH REGISTER 


ey 
sWORD COUNT REGISTER 


SELWC: MOV @SWR,OWC sMOV SWR INTO WORD COUNT REG 
BR SELWC 

’ 

sCURRENT ADDRESS REGISTER 

SELCMAs MOV @SWReOCMA +MOV SWR INTO CURRENT ADDR REG 
BR SELCMA 

’ 

#DISK ADORESS REGISTER 

SELDAR? MOV @SWR,ODAR sMOV SWR INTO DISK ADDR REG 
BR SELDAR 

3 

sDISK ADDRESS EXT AND ERROR REGISTER 

SELDAEs MOV @sWR,ODAE sMOV SWR INTO DISK ADDR EXT REG 
BR SELDAE 

’ 

sDATA BUFFER REGISTER 

SELDBR: MOV @sWR-ODBR 9 MOV SWR INTO DATA BUFFER 
BR SELDBR 


8 
8 
sLOOK AWEAD REGISTER 


MOVLKs MOV @ADS,%0 sMOVE LOOK AHEAD 
RESET 
RESET 
BR MOVLK sINTO REGISTER 0 


5 
§ 
sOISK CONTROL STATUS REGISTER 


SELDCS: MOV 0340,0PS sLOCK Up INTERRUPTS 
MOV 6177777,eNC 9SET WORD COUNT ©1 WORD 
MoV COUTBUF,@CMA 9SET UP CURRENT ADDRESS 
MOV @swR,e0CS sMOV SWR INTO CONTROL REG 
BIT eBITo,e0Cs 918 FUNCTION BITS SET 
BEQ SELDCS sFUNCTION BITS NOT SET 

DKBUSY: TSTB eocs sTEST FOR DISK NOT READY 
BPL DKBUSY sDISK STILL READY 
BR SELDCS pDISK NOT BUSY SELECT NEW CR 

i 

i 

5 

i 

3 

t 

1 





x 3 





c= 
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1756 
1757 ] 
1758 sTHIS ROUTINE ENABLES THE OpERATOR TO SELECT A TRACK STATICLY 
1759 #THE ROUTINE DOES A ONE WORD READ TO SELECT THE TRACK 
1760 sTHE OpERATOR MAY CHANGE THE SWITCH REGISTER AT ANY TIME 
1761 s9SWR6°0 EQUALS THE TRACK NUMBER 
1762 sSWR9°7 EQUALS THE DISK NUMBER 
1763 ’ 
1764 012136 052777 000400 166650 STAMP: BIS @BITé,e0CS 
1765 012144 017767 166630 166736 MOV eSWR, WORK! sFETCH SWR 
1766 012152 016767 166732 166726 MOV WORK1, WORK 
1767 012160 042767 176000 166720 Bic #176000, WORK sMASK THE TRACK AND DISK NO. 
1768 012166 006067 166714 ROR WORK 
1769 012172 006067 166710 ROR WORK 
1770 012176 006067 166704 ROR WORK 
1771 012202 006067 166700 ROR WORK 
1772 012206 006067 166674 ROR WORK 
1773 012212 016777 166670 166604 MOV WORK, @DAE sDISK EXT, ADDR, REG, LOADED 
1774 012220 017767 166554 166660 MOV @SsWR, WORK 
1775 012226 000367 166654 SWAB WORK 
1776 012232 006167 166650 ROL WORK 
1777 012236 006167 166644 ROL WORK 
1778 012242 006167 166640 ROL WORK 
1779 012246 042767 003777 166632 BIC 03777,WORK 
1780 012254 016777 166626 166540 MOV WORK, @DAR s0ISK ADDRESS REG LOADED 
1781 012262 012777 ©O185070 166530 MOV CINBUF,@CMA sLOAD CURRENT ADDRESS 
1782 012270 012777 #=177777 «166820 MOV 0177777,0uCc #LOAD WORD COUNT 
1783 012276 052777 000005 166510 BIs 0s,e0cs 9GO AND READ 
1764 012304 105777 166504 CTBUSY: TSTB eocs sTEST FOR CONTROL NOT READY 
1785 012310 100375 BPL CTBUSY sWAIT FOR CONTROL NOT READY 
17866 012312 026777 166572 166460 SWRCHGs CMP WORK1, @SWR 
1767 012320 001306 BNE STAMP 9SWR HAS CHANGED 
17868 012322 000773 BR SWRCHG 9SWR HAS NOT CHANGED : 
1789 ’ 
1790 a 
1791 3 
1792 ’ 
1793 fi 
1794 ! 
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OZRFBB,Pi1 
1795 
1796 i] 
1797 sROUTINE TO REPORT ERROR COUNT AND CONTENTS OF ONE REGISTER 
1798 ] 
1799 012324 004567 000404 STAER: JSR &5,CONV sCONVERT OCTAL TO ASCII 
1800 012330 001106 WORK sDATA TO BE CONVERTED 
18603 012332 013750 MESIO sADDRESS OF MESSAGE 
1802 012334 000006 6 
1803 012336 004567 000372 JSR %5,CONV sCONVERT OCTAL TO ASCII 
1804 012342 001066 ERCOUNT sERROR COUNT TO BE CONVERTED 
1805 012344 013536 HEDS sADDRESS OF MESSAGE 
1806 012346 000003 3 
1607 012350 104000 EMT 20 sREPORT MESSAGE 
18608 012352 013534 HEDSA 
1809 012354 013536 HEDS 
1810 012356 013750 MES10 
1811 012360 177777 ej 
1812 012362 004767 001016 JSR 97, 1NCTAB sINC, ERROR COUNT 
1813 012366 000167 000056 JMP EREXT sEXIT ROUTINE 
1614 Y 
1815 PROUTINE TO REPORT ERROR COUNT AND THE CONTENTS OF TWO REGISTERS 
1616 ] 
18617 3 
1618 3 
1819 012372 004567 000336 STAERI: JSR %5.-CONV sCONVERT OCTAL TO ASCII 
1620 012376 001106 WORK #DATA TO BE CONVERTED 
1821 012400 013750 MES10 sADDRESS OF MESSAGE 
1822 012402 000006 6 
1623 012404 004567 000324 JSR @5,CONV sCONVERT OCTAL TO ASCII 
18624 012410 001110 WORK! sDATA TO BE CONVERT 
1825 012412 013765 mMESIOA sADDRESS OF MESSAGE 
1826 012414 000006 6 
1827 012416 004567 000312 JSR e5,CONV sCONVERT OCTAL TO ASCII 
1626 012422 001066 ERcOUNT sERROR COUNT TO BE CONVERTED 
1629 012424 013536 HEDS sADDRESS OF MESSAGE 
1830 012426 000003 3 
1631 012430 104000 Eat 00 sREPORT MESSAGE 
1832 012432 013534 HEDSA 
1833 012434 013536 HEDS 
1634 012436 013765 MESIOA 
1835 012440 013750 MES10 
1836 012442 177777 oi 
1837 012444 004767 000734 JSR 07, INCTAB SINC, ERROR COUNT 
183@ 012450 032777 002000 166322 ERExTs BIT OBITIO, @SwWR sHALT ON ERROR 
1639 012456 001401 BEO is 
1840 012460 000000 HALT 
1641 012462 000205 iss RTs 85 sEXIT ROUTINE 
1642 . 
1643 ] 
1644 sROUTIWE TO DECODE EMT CALLS 
18645 sEMToieTYPE OWE LINE OF TEXT 
1646 SEMToOSTYPE A SERIES OF LINES 
18647 012464 011600 EMTRPs MOV (6),%0 
1648 012466 022740 104003 CMP @EMTei,°(0) gWAS THE CALL EMT¢} 
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DZRFBB P11 
1949 012472 001103 BNE TYPS sNO} TYPE A SERIES OF LINES OF TEXT 
1650 012474 000400 BR TYP SYES TYPE OWE LINE OF TEXT 





[A> 
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18651 
1852 
1653 
1654 
1855 
1856 
1857 
18658 
1859 
1860 
1861 
1862 
18663 
1864 
1865 
1866 
1867 
1668 
1869 
1870 
1871 
1872 
1873 
1674 
1875 
1876 
1877 
18678 
1879 
1880 
1681 
1882 
1883 
1864 
18865 
1886 
1687 
1886 
1889 
1890 
1891 
1892 
18693 
1694 
1695 
18696 
1897 
1696 
1699 
1900 
1901 
1902 
1903 
1904 


012476 
012500 
012504 
012506 
012512 
012520 
012522 
012526 
012532 
012534 
012542 
012544 
012552 
012554 
012560 
012562 
012570 
012572 
012600 
012604 
012606 
012614 
12616 
012624 
012630 
012632 
012636 
012644 
012646 
012650 
012656 
012662 
012670 
012674 
012676 
012700 


012702 
012704 
012710 
012714 
012722 
012724 
012726 
012730 
012732 


011600 
062716 
011000 
112067 
122767 
001005 
005067 
004767 
000002 
122767 
001442 
122767 
001443 
004767 
000752 
032777 
001026 
116777 
105777 
100375 
122767 
001003 
012767 
005767 
001406 
005367 
112767 
000746 
000207 
112767 
004767 
112767 
004767 
000704 
000000 
000000 


011600 
062716 
011067 
022767 
001001 
000002 
104001 
000000 
000763 


PF11 DATA TEST REPLACES DSOA 


000002 


000164 
000100 


000150 
000030 


000045 
000042 
000002 
040000 


000100 
166204 


000011 
000050 


000015 
177700 
000012 
177666 


000002 
000014 
177777 


000156 


000134 
000124 


166204 


000062 


000054 


000020 
000006 


MACY11.624 6°SEP<73 
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sSUBROUTINE TO OUTPUT ASCII MESSAGE ON TELETYPE PRINTER, 


TYP3 


TYPAs: 


TYPCs 


TYPDs 


183 


TYEXITs 
TYPFs 


TYPGs: 


TYPDATs 
NULL? 


MOV 
ADD 
MOV 
MOVB 
CMPB 
BNE 
CLR 
JSP 
RTI 
CMPB 
BEQ 
CMPB 
BEQ 
JSR 
BR 
BIT 
BNF. 
“OVB 
TSTB 
BPL 
CMPB 
BNE 
MOV 
TST 
BEG 
DEC 
MOVB 
BR 
RTS 
MOVB 
JSR 
MOVB 
JSR 
BR 

0 

0 


@86,%0 
#2,a%6 
080,80 
(0)¢,TYPDAT 
#100,-TYPDAT 
TyPc 

TYPDAT 
&7,TYPD 


#45,TYPDAT 
TYPF 
€42,TYPDAT 
TYPG 
&7,TYPD 
TYPA 
@BIT14,@SwWR 
TYEXIT 
TYPDAT,@TPB 
@TPS 

724 
@15,TYPDAT 
is 
e9,,NULL 
NULL 
TYEXIT 
NULL 
@0,TYPDAT 
TYPD 

a7 

#15, TYPDAT 
&7,TYPD 
612, TYPDAT 
27,TYPD 
TYPA 


sGET ADDRESS THAT CONTAINS MESSAGE ADDRESS 
?SET UP EXIT, 

sADDRESS UF MESSAGE TO FO, 
sGET CHARACTER 

sCHECK FOR "@" CHARACTEP 
sCRANCH IF NOT "8", 

sOUTPUT NULL 

3TO CLEAR BUFFER 

s TERMINATOR CHAR, DUNE, EXIT, 
sCHECK FOR "8%", 

sBRANCH IF "%", 

sNOT "4", CHECK FOR "8", 
sBRANCH IF "@" 

sTYPE CHAR IN TYPDAT 


sOUTPUT CHARACTER TO PRINTER 
sWAIT FOR DONE FLAG, 


;CHECK FOR CR 
sNOeSKIP 
sSET NULL COUNTER 


9 ZERO“EXIT 

sDECREMENT 

#ZERO OUTPUT 

sOUTPUT NULL 

sEXIT 

MOVE CARRIAGE RETURN CODE TO TYPDAT 
3GO TYPE CHAR, 

sMOVE LF CODE TU TYPDAT, 

3GO TYPE CHAR, 


sSUBROUTINE TO OUTPUT A SERIES OF ASCII MESSAGES ON TELETYPE PRINTER 


TYPS: 


TYPSAs 
TYPSB; 


MOV 
ADD 
MOV 
CMP 
BNE 
RTI 
EMT 
0 
BR 


@86,%0 
2,086 
@a0,TYPSB 
@-1,TYPSB 
TYPSA 


+1 
TYPS 


OCTAL TO ASCII CONVERT ROUTINE 


sGET ADDRESS THAT CONTAINS MESSAGE ADDRESS 
sUPDATE TO NEXT MESSAGE ADDRESS 

sADDRESS OF MESSAGE TO TYPSB 

sCHECK FOR TERMINATOR 

sBRANCH IF NOT TERMINATOR, 

sTERMINATOR, EXIT 

sCALL ON TYP SUB TO TYPE MESSAGE 

sADDRESS OF MESSAGE GOES HERE 

3GO PROCESS NEXT MESSAGE 


Ae 
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1905 sENTER ROUTINE AS FOLLOWS 

1906 sJSROS,CONV 

1907 sADDROSADDRESS OF NUMBER TO BE CONVERTED 

1908 sADDR BYTESLSB OF WHERE ASCII IS GOING 

1909 sASCIIesTHE NUMBER OF ASCII CHAR, TO BE CONVERTED 
1910 e 5 

1911 3 

1912 012734 013567 000054 CONV: MOV @(5)¢,ACNVX SVALUE OF @ TO BE CONVERTED 
1913 012740 012501 MOV (S)oo! sASCII ADDR 

1914 012742 012502 MOV (5)46%2 9@ OF ASCII CHAR 
1915 012744 060201 ADD 82,81 





MAINDECe11°¢DZRFB<B 
DZRFBB,Pi1 


1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1926 
1927 
19286 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
1936 
1937 
1938 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
1946 
1947 
1948 
1949 
1950 
1951 
1952 
1953 
1954 
1955 
1956 
1957 
1956 
1959 
1960 
1961 
1962 
1963 
1964 
1965 
1966 
1967 
1968 
1969 


012746 
012752 
012756 
012762 
012764 
012772 
012776 
013002 
013006 
013010 
013012 
013014 


013016 
013024 
013026 
013034 
013042 
013046 
013052 
013054 
013062 
013066 
013070 
013076 
013100 
013102 
013104 
013112 
013116 
013122 
013126 
013130 
013136 
013140 
013142 
013150 
013152 
013154 
013156 
013160 
013166 
013174 
013176 
013202 
013204 
013210 
013212 


016703 
042703 
062703 
110341 
042767 
006067 
006067 
006067 
005302 
001356 
000205 
000000 


012767 
000403 
012767 
012777 
005067 
105777 
100375 
017777 
108777 
100375 
022777 
001014 
104001 
013746 
042767 
006067 
006067 
006067 
000747 
022777 
001001 
000207 
036777 
001003 
104001 
013744 
000733 
017767 
042767 
000241 
006167 
000241 
006167 
000241 
006167 


RF1i DATA TEST REPLACES DSOA 


000042 
177770 
000060 


000007 
000016 


000040 
000100 
000340 
000400 
165740 


165726 
165722 


000377 


000007 
000330 
000324 
000320 


165622 
177770 


000022 


000424 


000414 
165740 


165722 


165710 


000334 


165636 


165720 
165712 


ACVNs MOV 
Bic 
ADD 
MOVB 
BIC 
ROR 
ROR 
ROR 
DEC 
BNE 
RTS 

ACNVXs 0 

H 

3 

’ 
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ACNVX,%3 
€177770,%3 
#60,%3 
@3,°C(1) 
67, ACNVX 
ACNVX 


sISOLATE LEAST SIGNIFICANT OCTAL® 


sSET UP ASCITI¢@ 
sSTORE ASCII CHAR 


yROTATE OCTAL# 


ye1 FROM ASCII CHAR COUNT 


sEXIT #@ CONVERTED 
sWORKK REGISTER 


U 
sROUTINE TO HANDLE KEYBOARD CONVERSATION 
sROUTINE ACCEPTS NUM, OR ALPHA CHARACTERS 


U 
NOCHAs MOV 


ALPHA: mov 
TYSTs MOV 


TSTFLG: TSTB 


CKCHs CMP 


CHOKs MOV 


640,TSTCH 
TYST 
€100,TSTCH 
@340,0PS 
TEXBUF 
@TKS 
TSTFLG 
OTKB,@TPB 
eTPS 

074 
0377,@TKB 
CKCH 

+1 


e7,TEXBUF 
TEXBUF 
TEXBUF 
TEXBUF 
TSTFLG 
0215,@TKB 
304 


a7 

TSTCH, OTKB 
CHOK 

+1 

TSTFLG 

@TKB, WORK 
6177770,WORK 
TEXBUF 
TEXBUF 


TEXBUF 


sSET UP FOR NUM, CHAR, 


3SET UP FOR ALPHA CHAR 
sLOCK UP INTERRUPTS 
sCLEAR TEXT BUFFER REG 
sCHECK FOR FLAG 


3 
sCHARACTER IN BUFFER 
sECHO CHARACTER 


sCHECK FOR RUB*OUT 
sEXIT IF NOT RUB-OUT 


sREPORT RUBeOUT ACKNOWLEDGED 


3GO WAIT FOR NEW CHAR, 


sCHECK FOR CARRIAGE RETURN 


gEXIT DELIMITER TYPED 


pREPORT QUESTION MARK 
sWAIT FOR CORRECT CHAR, 


Ce 





Lc EO AAA A A NN NN 
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1970 
1971 
1972 
1973 
1974 
1975 
1976 
1977 
1976 
1979 
1980 
1961 
1982 
1983 
1964 
1965 
1986 
1987 
19686 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2003 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2013 
2014 
2015 
2016 
2017 
2018 
2019 
2020 
2021 
2022 
2023 


013216 
013224 


013226 
013234 
013242 
013246 
013252 
013260 
013266 
013272 
013276 
013302 
013304 
013306 
013312 
013316 


013320 
013322 
013324 
013332 
013340 
013344 
013346 
013350 
013352 


013354 
013356 
013364 
013372 
013376 
013400 
013402 


013404 
013410 
013414 
013416 
013420 


066767 
000710 


172100 
000114 
000004 
000006 


012737 
012737 
013746 
013746 
012737 
012737 
012700 
012702 
012720 
006302 
103374 
012637 
012637 
000207 


104001 
014354 
012737 
012737 
005037 
005000 
005720 
000776 
000000 


000005 
012737 
012737 
004767 
000002 
000000 
000764 


016703 
042703 
000241 
006003 
005263 


RFii DATA TEST REPLACES DS50A 


165664 


013320 
000340 
000004 
000006 
000006 
000002 
172100 
000001 
000003 


000006 
000004 


013352 
013400 
000006 


013320 
000006 
177630 


165432 
177743 


000222 


000114 
000116 


000004 
000006 


000114 
000004 


000114 
000004 


ADD 
BR 
sROUTINE TO SET 
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WORK, TEXBUF yADD CHARACTER 
TSTFLG sWAIT FOR NEW CHARACTER 
ACTION ANABLE ON MA/MF PARITY MEMORIES 


sCALL JSR PC, MAMF 
PARCSR = 172100 
PARVEC = 114 


ERRVEC = 4 
SP = %6 
MAMFs MOV OPARSRV,@@PARVEC sSET PARITY INTERRUPT VECTOR 


MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
iss MOV 
ASL 
Bcc 
MOV 
MOV 
RTS 


€340,@8PARVEC*2 SAND PRIORITY LEVEL 1 ON INTERRUPT 
@sERRVEC,*(SP)  sSAVE CURRENT ERROR VECTOR 
@SERRVECe2,°(SP)  sAND PRIORITY LEVEL 


@ERRVEC +2, OSERRVEC 

ORTI,@OERRVEC C2 

@PARCSR,%0 sGET FIRST CSR ADDRESS 

@1.%2 

01,(0)¢ sSET ACTION ENABLE IF AVAILABLE 
%2 sSHIFT AVAILABILITY INDICATOR 
is 


(SP)¢,@eERRVEC*+2 sRESTORE ERROR VECTOR 
(SP)o,@eERRVEC ;PRIORITY LEVEL AND INTERRUPT VECTOR 


87 
sPARITY ERROR SERVICE ROUTINE 
sWHEN A PARITY ERROR IS DETECTED THE ROUTINE SCANS 
sMEMORY FOR THE PARITY ERROR, WHEN THE ERROR 
31S DETECTED THE PROGRAM HALTS wITH THE ADDRESS 
sCAUSING THE ERROR IW RO 
3TO CONTINUE PRESS CONTINUE 


PARSRV: EMT+! 
PARERR 


iss TST 
26% HALT 
383 RESET 


46% HALT 


INCTABs: MOV 


028, @8PARVEC sREPOSITION PARITY ERROR INT, 

646, @8ERRVEC sSET TIME OUT TRAP 

@sERRVEC +2 

80 

(0)¢ sSCAN MEMORY 

is 
sPARITY ERROR © ADDRESS 
sCAUSING ERROR IS IN REGISTER 0 


@PARSRV,@ePARVEC ;RESTORE PARITY VECTOR 
@ERRVECe2,@eERRVEC s;RESTORE TIME OUT HALT 
07,MAMF 


sERROR © PARITY ERROR NOT DETECTED ON SCAN 
3% 94(SP) CONTAINS PC SHERE 
sPARITY ERROR WAS ORIGINALLY DETECTED 


FLAG,%3 

0177743,%3 pMASK DEVICE NO 

%3 sNORMALIZE 

TABLE(3) sINCREMENT ERROR COUNT 
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4 
n 


2024 013424 000207 
2025 013426 000000 - TABLE: 
2026 013430 000000 
2027 013432 000000 
2028 013434 000000 
2029 013436 000000 
2030 013440 000000 
2031 013442 000000 
2032 013444 000000 


&7 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 
sERROR COUNT DRIVE 


eosoooocco”sm 
“MO@VOGwneK Oo 


nnn eee 
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2033 013446 000000 TEXBUF: 0 
2034 013450 000000 TSTCHs 0 
2035 , 
2036 

2037 ’ 
2038 , 
2039 H 
2040 ’ 
2041 3 
2042 

2043 eEVEN 

2044 013452 042045 052101 020101 HEDi: eASCII /RDATA ERR @/ 
2045 013460 051105 020122 100 

2046 ’ 

2047 U 

2048 013465 045 052123 052101 HED2: eASCII /SSTATUS ERR @/ 
2049 013472 051525 042440 051122 

2050 013500 040040 

2051 g 

2052 3 

2053 013502 042445 052130 040522 HED3: eASCIIL /REXTRA BKS @/ 
2054 013510 041040 051513 040040 

2055 ’ 

2056 013516 042045 020113 042101 HED4: eASCII /@DK ADDR ERR 6, 
2057 013524 051104 042440 051122 

2058 013532 040040 


ERROR MESSAGE HEADERS 


2059 3 

2060 U 

2061 013534 040045 HEDSAs ,ASCII /8@/ 
2062 g 

2063 


’ 
2064 013536 020040 020040 051105 HEDS: eASCII # ERR CNT @/ 
2065 013544 020122 047103 020124 
2066 013552 100 
2067 i] 
2068 a 
2069 013553 045 040522 042516 HED6: eASCII /QRANEX ERR 67 
2070 013560 020130 051105 020122 
2071 013566 100 
2072 , 
2073 $ 
2074 sMESSAGE TRAILERS 
2075 3 
2076 ’ 
2077 013567 040 020040 020040 MESis eASCIL / DAR @/ 
2078 013574 020040 040504 020122 
2079 013602 100 
2080 i] 
2081 3 
2082 i] 
2083 013603 049 020040 040504 M 
2064 013610 020105 100 
2085 
2086 t 


ESiAs ,ASCII / DAE @/ 


fe 
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2087 
20866 013613 040 
2089 013620 020040 
2090 013626 100 
2091 
2092 013627 040 
2093 013634 020040 
2094 013642 051105 
2095 
2096 
2097 013646 020040 
2098 013654 042122 
2099 013662 100 
2100 
2101 
2102 
2103 013663 040 
2104 013670 020040 
2105 013676 042101 
2106 
2107 
2108 
2109 013704 020040 
2110 013712 043440 
2111 013720 040524 
2112 
2113 
2114 


RF11 DATA TEST REPLACES DSOA 


020040 
041504 


020040 
051110 
040122 


020040 
041440 


020040 
051127 
051104 


020040 
020104 
040040 


020040 
020123 


020040 
020104 


053440 
052116 


020040 
020104 
040056 


020040 
040504 


U 
MES23 


eASCII 


ASCII 


ASCII 


,ASCII 


ASCII 
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J DCS @, 

’ HRD ERR@/ 

”) WRD CNT@/ 

/ WRD ADDR,@/ 
/ GD DATA @, 


Ge 


nnn eee tiie nn EOEOeVeeeeeeeeae 
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2115 

2116 013724 020040 020040 020040 MES6: eASCIL 7/ BD DATA @/ 

2117 013732 041040 020104 040504 

2118 013740 040524 040040 

2119 ’ 

2120 ’ 

2121 sMO38 

2122 013744 040077 MEST3 eASCIIL 707 

2123 ’ 

2124 ’ 

2125 ’ 

2126 ’ 

2127 013746 040057 MES63 eASCII °7@° 

2128 ’ 

2129 ? 

2130 013750 020040 020040 020040 MESI0: ,ASCII WRDI @7 

2131 013756 053440 042122 020061 

2132 013764 100 

2133 ’ 

2134 ’ 

2135 013765 040 020040 020040 MESIOAs ,ASCII / WRD2 @7 

2136 013772 020040 051127 031104 

2137 014000 040040 

2138 H 

2139 014002 052445 044516 020124 MESii: ,ASCII /§UNIT NO,@/ 

2140 014010 047516 040056 

2141 8 

2142 ’ 

2143 014014 020040 100 MESi2: ,ASCII ¢ @6/ 

2144 ’ 

2145 q 

2146 014017 040 051040 040505 MES13: ,ASCII ¢ READ @, 

2147 014024 020104 100 

2148 ’ 

2149 ’ 

2150 014027 045 050103 020125 TIMO: eASCII /QCPU BKGRND TIMED OUT@s 

2151 014034 045502 051107 042116 

2152 014042 052040 046511 042105 

2153 014050 047440 052125 100 

2154 t 

2155 ’ 

pene 014055 045 045517 040041 OKs eASCII sQ0KI07 

157 

2158 sCONVERSATION TEXT 

2159 ] 

2160 ’ 

2161 014062 042045 052101 020101 CONi: eASCII /QDATA TEST ONLY? @/ 

2162 014070 042524 052123 047440 

2163 014076 046116 037531 040040 

2164 ’ 

2165 i 

2166 ’ 

2167 014104 046445 046125 044524 CON2: eASCII /QMULTI DK MODE?@s 

2166 014112 042040 020113 047515 





' 


H 
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2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2176 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
2186 
2187 
2188 
2189 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 
2212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2221 
2222 


014124 
014132 
014140 
014146 
014154 


014155 
014162 


014166 
014174 
014202 


014205 
014212 
014220 
014226 


014232 
014240 


014245 
014252 
014260 
014266 


014270 
014276 


014300 
014306 
014314 


014316 
014324 


014325 
014332 
014340 
014346 


021445 
045504 
047524 
041517 

100 


047445 
042122 
020077 


045 
044124 
047524 
024460 


053445 
042104 


045 
042040 
040520 
040077 


053445 
040077 


053445 
041440 
040077 


051045 
100 


RF1i DATA TEST REPLACES DSOA 


040077 


047440 
020123 
030440 
040524 


054105 
040077 


052120 
041440 
100 


042514 
024040 
030440 
040077 


042122 
037522 


050117 
052101 
027124 


044522 


044522 
042510 


047520 
040510 
046111 


020106 
020061 
020060 
037514 


053440 
052116 


040440 
100 


027124 
020101 
021440 


042524 


042524 
045503 


037504 


042527 
020123 
042105 


’ 
CON3: ASCII 


’ 
CON4: ,ASCII 


U 
CONS: ASCII 


3 
CON63 ASCII 


5 
CONT: ASCII 


U 
CONB: ASCII 


, 
CON9: ASCII 


] 
CON10: ,ASCII 


’ 
’ 
CON133 ,ASCII 
’ 
’ 
PWRFs ASCII 


MACY11,624 6eSEP=73 14:33 


/4e OF DKS 1 TO 10 OCTAL?@/ 


/OEX, DK?e/ 


/eO0PT WRD CNT? @/ 


/OLENGTH (1 TO 1000)?0/ 


/RWRD ADDR?Os 


/R0PT, DATA PAT, #707 


/QWRITE?O, 


/OMRITE CHECK ?O,/ 


/EREAD?O/ 


/RPOWER HAS FAILED@, 


PAGE 59 
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2223 
2224 
2225 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
2238 
2239 


014347 
014354 
014362 
014370 
014376 
014401 
014405 
014412 
014417 
014424 
014432 
014440 
014444 
014452 
014460 


045 
046445 
020131 
054524 
051117 

040 

045 
051105 

045 
020105 
047440 
047111 
042045 
051450 
046040 


RF11 DATA TEST REPLACES 


047105 
046505 
040520 
042440 

100 
020040 
040520 
020116 
051104 
042532 
043106 
040105 
044522 
020051 
047111 


040104 
051117 
044522 
051122 


047522 
046040 


042526 
047117 
040105 


PATMES?: 
PATHED?: 


WODRV: 


eASCII 
ASCII 


eASCII 
ASCII 


ASCII 


ASCII 


oEVEN 
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/RENDe/ 
JQMEMORY PARTTY ERRORO/ 


/ e/ 
JEPATTERN 67 


/QDRIVE ZERO OFF LINE@/ 


/RDRIVE(S) ON LINE@/ 
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2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 


014466 
015070 


000000 
015070 
000000 


RF11 DATA TEST REPLACES DSOA MACY11,624 6°SEP<73 


OUTBUF: 0 
o2,%400 
INBUFs 0 
i 


14:33 PAGE 61 
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DZRFBB,Pi1 CROSS REFERENCE TABLE 

ACNVX 013014 3400 341e 3420 3436 345 441e 443 1250¢ 125i¢ 1253 14516 14520 1454 
1457e 1458 14590 1461 19120 1916 19206 19210 19220 19236 19278 

ACVN 012746 19168 1925 

ADAM 010174 1357 13618 

ADRCMP 003260 $31 53768 

ADRD 005462 893 6950 

ADS 001032 1628 661 1733 

ADTST 002056 247 3368 1024 

ADT2 002150 $5 3668 479 

ADT3 003014 61 4950 555 

ADT4 003370 65 $728 646 

ADTS 004016 68 65460 691 

AKH 007470 1204 1207 12128 

ALPHA 013026 251 257 282 315 321 327 19378 

ASKwC 001554 270 2808 

BITO == 000001 108 4127 1507 1744 

BITi = 000002 ile 

BITi0 # 002000 208 254 350 1115 1124 1235 1406 18636 

BITi1 # 004000 218 221 245 260 336 477 $54 644 690 758 835 966 1000 

BITi2 = 010000 228 330 877 892 

BITi3 = 020000 230 324 866 4131 

BITi4 # 040000 240 318 656 1100 1868 

BITiIS #2 100000 250 308 $91 593 $96 633 635 641 

BIT2 #s 000004 120 

BIT} = 000010 i3e 

BIT4 s#s 000020 i4e 1827 

BITS #2 000040 iSe 

BIT6 ss 000100 166 1164 1215 1232 

BIT? #s 000200 ive 165 1146 

BIT@ # 000400 188 376 402 427 508 526 576 610 660 698 773 900 939 
4113 1461 1562 1580 1601 1651 1677 1764 

BIT9 ss 001000 198 860 671 686 920 941 948 957 965 967 1061 1121 1134 
1364 1450 1569 15865 1638 1689 1696 

BUF 001086 1816 3680 3990 4290 4590 $00e S77 6ile 6590 70Se 1298 179¢ 1940 
6560 8680 6790 9380 9540 1036 16860 

CHKBUF 002650 435 4540 

CHKDAT 011336 15640 1592 

CHKDOS 006224 10026 1012 

CHKDSK 011504 16378 1645 

CHKFLG 002046 329 3316 

CHOK 013160 1956 19620 

CHWRD 010520 14458 1449 1469 

CKCH 013130 1946 19546 

CKNEX 010530 1446 14488 “ 

CLEAR 010462 1427 14296 

CLRREG 005160 8378 

CLRTAB 001126 2048 207 

CMA 001020 1579 i716@ 1742@ #817816 

CMDAE 007274 1163 11860 

CMNETK 003714 624 6316 

CMPDTK 003656 617 6230 

CMPNEX 003266 5390 549 

CmMPXi 004532 741 7498 

COMDAR 007256 11860 11620 


MAINDEC?11°DZRFBoB RF1i DATA TEST REPLACES DSOA MACY11.624 6°SEP*73 14:33 PAGE 63 

DZRFBB,P11 CROSS REFERENCE TABLE 

COMPAR 010112 894 963 135068 

CONM 001372 218 2498 

CONY 012734 233 344 442 968 972 976 1064 1076 1085 1094 1105 1218 1222 
1252 1374 1378 1383 1368 1394 1453 1460 1799 1903 1619 1623 1827 
1912¢ 

CON1 014062 250 21618 

COoNni10 014300 320 220868 

CONi1 014316 326 22138 

CON2 014104 256 21676 

CON3 014124 262 21720 

CON4 014155 272 21796 

CONs 014166 201 21638 

CON6 014205 286 21686 

CON? 014232 295 . 21948 

cones 014245 302 21980 

CON 9 014270 314 22048 

CTaUSsy 012304 17646 1765 

DAE 001024 15968 226¢e 2466 1062 1102 1166 1212 17240 1773 

DAR 001022 1580 304 441 468 1083 1162 1205 1209 1214 1720¢ 1780¢ 

DATAT 005170 352 0480 901 909 

DATTES 001514 289 2718 275 

DBR 001026 1608 1030 1728¢ 

ocs 001014 1550 221 3760 378 380 363 402¢ 404 406 408 427e 432 434 
436 462 464 467 $0866 $10 $12 $14 $260 $26 $30 533 $76¢e 
$80 $02 $65 6100 614 616 619 6600 662 667 670 906 707 
709 712 718 720 723 731 733 736 7730 783 7865 767 796 
798 601 616 618 621 9390 1088 1070 1093 1100 11130 1127¢ 1481¢ 
1562¢ 1580e 16016 16516 1677¢@ 1743¢ 1744 1746 1764¢e 1783¢ 1764 

DELAY 011600 1609 1687 166180 

DELMES 006576 1073 1063¢e 

OISsBUF 007242 902 11790 187s 1591 1644 1702 

DISK 006344 42 10308 

OKBUSY 012126 1746¢@ 1747 

OKINT 006436 47 10886 

OMA 001052 179¢@ 2120 2990 3720 390 392¢ 4018 4300 4S7e 4950 $20¢ $240 $$2¢ 
$720 $940 $986 607e 6370 6426 6540 674 606 6088 703 716¢ 7280 
7016 7930 C140 8370 9290 9300 9320 969 99808 1035 11700 1171¢ 11790 
11862 1196¢e 12140 1219 1233¢ 1366 1563e 1581¢ 1632¢ 1681¢ 

DOWN 011376 37 1566 16010 1605 

ORVERO 006300 1010 10130 

DSKDR 001446 2616 266 

DSKNOR 001076 1898 241¢ 242¢ 2430 2448 267¢ 2680 2690@ 1004 

DSKRD 005402 6020 ex 

ELH 005446 8e9 09286 

EMTRP 012464 40 18478 

END 014347 1016 22238 

ERADR 007524 1193 121860 

ERCOUN 001066 16S¢ 3820e 4106 4390 4666 $1Se $320 $42¢ S64e 6160 6270 669e 66i¢e 
File 722¢ 735¢ 742¢ 7$1¢ 766¢ 800e tote 6200 a20e 1804 1828 

EREXT 012450 1613 16360 

ERRVEC = 000004 1976¢@ 1961 1982 19836 19040e 1990¢ 19916 2004e 2005¢ 20130 

Eri 002276 3660 

ER10 003312 $430 


ERi1 003464 5660 





MAINDEC*11°DZRFB=B 
OZRFBB,P11 

ERi2 003650 
ER13 003710 
ER14 004124 
ER15 004176 
ER16 004340 
ER17 004404 
ER20 004464 
ER21 004524 
ER22 004564 
ER23 004716 
ER24 004776 
ER25 005036 
ER26 005102 
ER27 005142 
ER3 002432 
ER4 002616 
ERS 002752 
ER6 003144 
ER? 003252 
ESH 005356 
EXGEN 010042 
EXMFLG 002134 
EXRAX 006162 
EXREF 010714 
EXTCME 007410 
EXTOR 007522 
EXTMEN 010634 
EXTPP 006340 
FILDAT 007700 
FLAG 001042 
GOTMEM 010756 
HED1 013452 
HED2 013465 
HED} 013502 
HED4 013516 
HEDS 013536 
HEDSA 013534 
HED6 013553 
HINUM 010046 
HRDER 001100 
INADB 003060 
INBUF 015070 
INCADS 004204 
INCCMP 003316 
INCTAB 013404 
INDADT 002760 
INPUT 001104 
INSRD 003560 
INSWT 003432 
INTEXT 007024 


6208 
6288 
6718 
6628 
71360 
7248 
7378 
7458 
7548 
7898 
8028 
6108 
6228 
6318 
4iis 
4408 
4698 
5168 
53408 
867 
1302 
337 
966 
14918 
1195 
1201 
61 
906 
12658 
1758 
336 
1000 
1215 
14867 
1399 
1069 
1465 
1227 
1805 
238 
981 
1278 
1908 
5038 
611 
1781 
676 
540 
1060 
465 
192¢ 
$90 
5798 
1059 


6778 


RF11 DATA TEST REPLACES DSOA 
CROSS REFERENCE TABLE 


10248 
245¢e 
656 


10136 
1371 


1833 
1832 


13098 
1118 


729 


MACY11.624 6°SEP<73 
2540 2608 2798 
866 677 8B0e 

1017e 1032 1061 
1392 1450¢ 2019 

20648 

20618 

1565¢ 158636 1634¢ 
740 743 749 

1837 20198 

1422 1441 1444 

601 


14233 


PAGE 64 
3086 3120 3186 
6840 896 904 
1074 11640 1188 
16867¢e 
753 7194 805 
1Sile 1512¢ 


324¢ 
9206 
1194 


330@ 
965 
11966 


826 


331 
9678 
1208¢@ 


830 





MAINDEC*11°DZRFB<B 
DZRFBB,.P11 

LDAT 005234 
LGMEM 010740 
LOGICA 006330 
LONUM 010044 
LPADT3 003360 
LPADTS 004132 
LPSPTi 004572 
LPTSK 004002 
LPXSPI 005150 
LP2ADT 003000 
MA 001030 
MAMF 013226 
MAXREF 010750 
MES] 013567 
MESIA 013603 
MES10 013750 
MESI0A 013765 
MES11 014002 
MES12 014014 
MES13 014017 
MES2 013613 
MES2A 013627 
MES3 013646 
MES4 013663 
MESS 013704 
MES6 013724 
MES? 013744 
MESS 013746 
MOVLK 012054 
MSTR 005530 
MVNEM 003530 
MYBYWR 011254 
NOCHA 013016 
NODRV 014417 
NULL 012700 
NZUF 010452 
OK 014055 
OPDAR 001636 
OPDSEL 007054 
OPPAT 001664 
OPRD 002020 
OPWCK 001772 
OPWRT 001744 
OUTBUF 014466 
OvRFLO 010466 
PARCSR # 172100 
PARERR 014354 
PARSRV 013320 
PARVEC = 000114 
PASEL 007620 
PASS 001074 


652 
1484 
10208 
1277 

$51 

668 

750 

632 

627 

474 

161¢ 

216 
1486 

970 

974 
1801 
1625 

339 

346 
1078 
1096 
1107 

978 

G44 
1365 
1390 
1960 
1948 

114 

90460 

$92 
15686 

263 

231 
16756 
1426¢@ 
1705 

294 

655 

3018 

323 

317 

307 

368 

$93e 

928 
1742 

695 
19748 
2002 
1979 
19758 

373 

168¢@ 


6558 
14968 


1266 
5548 
6748 
7588 
6448 
6356 
477¢@ 


19798 
1493 
983 
982 
1810 
1634 
21398 
349 
1081 
1099 
iii 
964 
447 
1403 


903 


1296¢ 


2014 
iS0i¢8 
1087 
1066 
1821 
21356 


21438 
1396 
20688 
20928 
20978 
1455 
21098 
1462 


1736 


287 
1676 


332 
4260 
s97e 
932 


14398 


2012 

1980¢ 
12506 
15340 


RF11 DATA TEST REPLACES DSOA 
CROSS REFERENCE TABLE 


1091 
1090 
1835 


1400 


1466 
1467 


429 
659 
9330 


20030 
1685 


MACY11.624 6°SEP<73 


1220 
1224 
21308 


21466 


$00 
704e 
934 


1229 °° 1376 1402 
1228 13860 1401 


1935¢ 

$02 $05 $37 

705 7768 7770 
936 938 1262 


14233 PAGE 65 


20778 
20838 


548 
779 
1351 


5740 
658 
1486 


$77 
868 
1505 


589 
924 
1511 


#17 





MAINDEC*"11°DZRFB=B RFii DATA TEST REPLACES DSOA MACY11.624 6°SEP°73 14:33 PAGE 66 

OZRFBB.P11 CROSS REFEREWCE TABLE 

PASSC 001102 191i¢ 9186 9668 1676¢e 1706 

PATHED 014405 1257 22298 

PATMES 014401 1254 1258 22268 

PATNU 001054 1608 2138 3098 311¢ 369 370¢ 3740 9078 908 910 1250 1260 16808 

PATO 010050 1265 13228 , 

PATi 010052 13238 

PAT10 010070 13308 

PATi1 010072 13318 

PAT1i2 010074 13328 

PATi3 010076 13338 

PAT14 010100 1334¢e 

PATi5 010102 13350 

PATi6 010104 1336¢ 

PAT17 010106 13378 

PAT2 010054 13246 

PAT20 010110 13388 

PAT3 010056 13258 

PAT4 010060 1326¢ 

PATS 010062 13278 

PAT6 010064 13288 

PAT? 010066 P 13298 

PFTi 011204 65 15608 

PFT2 011442 88 16308 

PFWAT 011214 15628 1565 1877 1593 

POWFAL 011622 1561 1631 16776 16867 

PRIORI 001040 1658 864 675 690 922 945 952 961 1573 1589 1642 1693 1700 

PS 001002 147¢@ 2098 699e@ 7740 8490 6530 8640 869e 87S5e 682e 890e 9226 945¢e 
952¢e 9610 15730 1589¢ 1642¢ 16930 1700e 17406 19380 

PWRDN 011542 1635 16516 1655 

PWRF 014325 1608 22176 

PWRFL 011452 1632¢ 1634 1646 1658 

PWRUP 011560 1652 1655¢ 

RANDOM 007720 925 937 1264 12776 1306 

RANER 006072 921 9658 

RANEX 005564 7 9166 990 

RANNU 001044 1766 

RCNODV 001272 222 224 2288 

RDMORE 002304 361 3908 

RDTDN 003212 5268 $36 $53 

RDOTKS 003616 6130 622 638 640 643 

RDWAIT 005436 667 6906 

READ @ 104405 3is $27 613 730 795 815 665 956 

REH 005512 676 9008 

REPDRV 001306 229 2330 

REPOEN 006310 1001 1005 10158 

RFADT 002224 3766 389 393 

RFRD 002330 391 395¢ 476 

RKNUM 014444 235 239 22358 

RTIX 011202 1518 1523¢ 15456 

SAVE 001070 1668 369@ 374 395e 420 423 430 454e 4560 So7e $19 5370 539 
$41 $466 $46 6098 623 625 631 633 635e 6360 641¢e 0566 135i¢ 


1353 1358e 1382 148626 1485 1486 1490 1491 1492 1494¢ 14966 is0ie 1505e 
SAV1 001072 1678 3946 401 409 415 417 437 457 473 4750 1352¢ 1353 13596 


MAINDEC*11°DZRFB=B RFii DATA TEST REPLACES DSOA MACY11.624 6°SEP*73 14333 PAGE 67 

OZRFBB,.P11 CROSS REFERENCE TABLE 
1367 

SELCMA 012014 98 17166 1717 

SELDAE 012034 106 17248 1725 

SELDAR 012024 102 17208 1721 

SELDBR 012044 110 17286 1729 

SELDCS 012066 118 17408 1745 1748 

SELwCc 012004 94 17128 1713 

SHIFT 007736 12616 1265 

SLH 005304 657 863 8668 

SOFTER 006760 1101 11198 

SP 28000006 19778 19616 19862¢ 1990 1991 

SPECOR 001234 2216 227 

SPILi 004346 710 7168 

SPIL2 004412 721 7278 

SPIL3 004472 734 7408 

SPIRAL 004232 71 6988 715 726 739 748 757 759 

STAER 012324 $16 534 586 620 671 713 724 737 789 802 822 17998 

STAERi 012372 386 411 440 469 543 628 662 745 754 810 831 16198 

STAMP 012136 122 17646 17867 

START 001116 46 2028 

STATUS 001036 1648 

SUADB 002440 407 4156 455 

SwWR 001000 1468 217 477 554 644 690 738 835 860 671 886 892 900 
941 948 957 968 1115 1121 1124 1131 1134 1146 1149 1157 1235 


1406 1569 1585 1638 1689 1696 1712 1716 1720 1724 1728 1743 1768 
1774 1786 18638 1868 


SWRCHG 012312 17866 1788 

SwRocT 001064 1848 214@ 215 292 293 651 1200 1423 1442 1508¢ 1509¢ 1510 16830 
1684 

TABLE 013426 204 1009 =. 20238 20258 

TDMA 001062 1638 

TEXBUF 013446 2208 223 225¢ 228 234 241 252 258 264 265 267 274 27708 
278¢@ 279 283 2866 290 292 297 299 304 306 309 316 322 
328 19390 19496 1950¢ 19Si¢ 1952 196S¢ 19670 19696 1970@ 20338 

TFBL 003152 513 $190 

TIMO 014027 1342 21508 

TKB 001006 1496 1942 1945 1954 1957 1962 

TKS 001012 iSie 1940 

TPR 001004 1486 1870e 1942¢ 

TPS 001010 15086 1671 1943 

TRACK 001050 178¢ 2116 3716 4960 $73¢ 600¢ 608e 6390 6556 702¢ 780 6386 9340 
973 999¢ 1031 1156 11616 1190 1197@ 1212¢@ 12130 12340 1367 15640 1562¢ 
16336 1662¢ 

TSTCH 013450 1935 1937 1957 20346 

TSTFLG 013046 19406 1941 1953 1961 1971 

TSTTK 003472 $83 S090 

TWRDOCT 001060 16206 

TYEXIT 012646 1869 1677 16618 

TYP 012476 18650 16536 

TYPA 012506 16566 1867 1886 

TyPc 012534 1656 18628 

TYPD 012562 1860 1866 16666 1680 1683 18685 

TYPDAT 012676 1656¢ 1657 18596 1862 1864 1870 1873 18679 1882 1864e 18678 


TYPF 012650 1863 16628 





MAINDEC"11°DZRFB-B RF1i DATA TEST REPLACES DSOA MACY11.624 6°SEP*°73 14:33 PAGE 68 

OZRFBB,P11 CROSS REFERENCE TABLE 

TYPG 012662 1665 1864s 

TYPS 012702 1849 186908 1698 

TYPSA 012726 1694 16968 

TYPSB 012730 18926 18693 16978 

TYST 013034 1936 1936¢ 

UP 011414 1602 16050 

UPCHK 011312 15608 1563 1610 

VECTOR 001034 1638 

we 001016 1560 1119 1712¢ i741« 1762 

wcCCON 001574 2656 289 291 

WCWAIT 005346 872 6756 

WDERR 010176 1354 13648 

WONWD 002334 3968 399 414 

WORK 001106 197¢@ 2038 206 3640 365@ 4090 415¢ 4160 420 4370 4380 4686 497@ 
$03 So4e $07 Side 5190 $21 5230 5330 S4i¢ 585 619@ 6260 6640 
6708 675 6778 678 680 712¢ 7230 7368 7430 753 7678 eole 8090 
821¢ 8308 8960 8978 698 9238 935 1002¢ 1003 1004 1006 1032¢ 1033 


1034 10418 1042¢ 1043 1062 1063 1065 1070 1071¢ 1072 1074e 107S¢ 1077 
1083 1064¢e 1086 1093¢ 1095 1102¢ 11030 1104e 1106 1149@ 1150¢ 1151¢ 1152¢ 
1153 11540 115Se 1156 1157e 11586 1159¢ 1160¢ 11616 1162@ 1163¢ 1164 1165¢ 
11666 1167 11686 11696 1171 11866 1189 1190 11916 1192 120S5¢ 12066 1261¢ 
1266¢ 1267 13016 130Se 13666 13660 1375 1382 1364 1367¢ 1389 1392¢ 13930 
1395 1766¢ 1767 1768 1769¢ 17708 i7vie 1772¢ 1773 17740 1775 17760 1777¢ 
1778¢ 1779@ 1780 1800 18620 19626 1963 1970 


WORK! 001110 1986 3630 4080 4360 467 4986 S25 539 547 550 625¢ o74e 675 
678 71440 152¢ 608e 629e 1166 1167 1192 12026 1203 1223 1367 1370 
13730 1379 176S¢ 1766 1766 1624 

WORK2 001112 1998 1350 135Se 1356 1368 

WORK} 001114 2008 13718 1372¢ 1373 14230 14240 1425¢ 1426 14420 14436 14440 1445 

WRABF 003104 S08e $18 

WRADTS 004052 6600 673 6865s 669 

WRCADT 002522 425 4276 451 

WRCHEC = 104407 308 431 870 947 1564 1637. 1695 

WROCMP 010132 13538 1360 

WROCT 001046 177¢@ 215¢ 2930 3676 400¢ 4266 460 S0ie $78¢ 612 6580 701¢ 727@ 
7780 1928 8Sie 9286 930 935 977 1037 1179 1200 1206 12096 1210¢ 
i2ii¢e 1261 1356 1439 1510¢ 1684e 

WRDINC 010142 13556 1409 

WRDNW 011712 16686 1703 

WRITE = 104403 298 377 403 461 509 579 663 706 717 782 859 940 1506 
1668 

WRLG 005620 9230 927 931 987 

WRWAIT 005274 861 6648 

XINCW 011142 iS3iee 1532 1533 1536 

XLPADT 004222 667 6908 

XSPIRA 004602 74 7738 791 604 813 824 634 836 

XWAIT 011052 35 15168 

XISPIL 004724 766 7928 

X2SPIL 005004 799 8056 

X3SPIL 005044 606 Gide 

X4SPIL 005110 819 6268 

ZBUF 010430 863 955 14228 

ZEROAD 002660 424 4568 472 


ZRBIT 003764 634 6418 





—— SSS SSS SSS 


MAINDEC11°DZRFB=B RF1i DATA TEST REPLACES DSOA MACY11.624 6°eSEP*73 14333 PAGE 69 

DZRFBB,.P11 CROSS REFERENCE TABLE 

° = 015072 33¢ 348 398 456 Sie 546 1418 253 351 379 405 433 459 
463 4786 $11 $29 $61 615 645 708 719 732 764 7197 617 
905 942 944 949 951 958 960 9869 1116 1122 1125 1132 1135 


1147 1216 1236 1369 1407 1528 1535 1570 1572 1586 1568 1039 1641 
1690 1692 1697 1699 1872 1944 1955 22428 





MAINDECe11°DZRFB=B RF1i DATA TEST REPLACES DSOA MACY11.624 6°SEP=73 14333 PAGE 70 

OZRFBB,PIi CROSS REFERENCE TABLE 

aoc 1267 12869 1291 1292 1294 1297 

ADD 225 226 392 454 $20 546 552 594 598 637 642 907 930 1011 1013 


4171 1179 1190 1199 1206 1286 1268 1290 1293 1295 1296 1358 1359 1368 1425 
1441 1444 1494 1512 18654 1691 1915 1918 1970 


ASL 1281 1966 

Bcc 599 638 1180 1207 1369 1969 

BCS 931 

BEQ 224 2869 307 332 337 351 391 421 424 474 478 540 551 590 624 
632 634 645 676 679 687 741 750 806 627 857 867 878 927 966 


9869 1001 1005 1019 1101 1116 1120 1122 1125 1132 1183 1236 1264 1302 1357 
1407 1449 1463 1493 1535 1745 18639 1863 1865 1877 

BHI 1010 

BIC 312 343 416 419 596 635 880 897 920 926 933 967 1003 1017 1033 
1042 1063 1071 1075 1104 1155 1169 1170 1187 1189 1191 1198 1202 1213 1232 
1372 1393 1507 1767 1779 1917 1920 1949 1963 2020 


BIS 219 245 254 260 279 308 316 324 330 376 402 427 $08 $26 $76 
593 610 641 660 698 773 939 1034 1061 1113 1127 1164 1208 1364 1373 
1450 1461 1562 1580 1601 1651 1677 1764 1763 

BIT 221 331 336 350 477 554 $91 633 644 690 758 835 856 860 866 
671 677 686 892 900 941 948 957 965 968 1000 1100 1115 1121 1124 


1131 1134 1146 1215 1235 1406 1569 1565 1638 1689 1696 1744 1638 1866 1957 
BLOS 266 275 291 298 305 


BMI 218 1464 1487 
BNE 207 222 229 253 259 264 317 323 329 $06 $22 $49 555 $92 691 
759 836 861 872 667 693 699 901 909 942 949 958 987 1073 1135 


1147 1193 1204 1216 1268 1265 1306 1354 1427 1446 1570 1586 1639 1065 1667 
1690 1697 1787 1849 1658 1869 1674 1894 1925 1946 1955 1958 


BPL 379 381 405 407 433 435 463 465 Sii 513 $29 $31 561 $83 615 
617 666 668 708 710 719 721 732 734 764 786 797 799 617 819 
905 1059 1195 1533 1747 1765 1672 1941 1944 

BR 227 270 369 393 414 425 451 455 472 518 536 $53 see $95 601 
622 640 643 673 665 6869 15 726 139 748 787 791 604 13 624 
634 863 674 669 903 944 951 960 1012 1014 1201 1360 1409 1430 1469 


1495 1497 1524 1536 1572 1576 1977 1568 1592 1641 1645 1646 1658 1092 1699 
1703 1713 1717 1721 1725 1729 1736 1748 1788 1850 1867 1880 1666 1696 1936 
1953 1961 1971 2008 2017 


eLc 276 310 1007 1964 1966 1968 2021 

CLR 205 210 211 212 213 220 246 370 371 372 394 395 422 456 456 
495 496 497 498 $23 $24 525 $72 $73 574 607 608 609 654 655 
656 702 780 637 638 910 998 999 1055 1196 1197 1233 1234 1280 1350 


1429 1503 1519 1530 1538 1563 1564 1581 1562 1632 1633 1662 1661 16082 1659 
1939 2005 2006 


CMP 223 252 258 265 274 2863 290 297 304 306 316 322 328 390 420 
423 473 505 521 539 548 $50 589 623 631 675 678 686 740 749 
605 826 896 908 1004 1009 1072 1162 1192 1203 1263 1353 1356 1426 1445 
1466 1492 1525 1786 1648 1693 1945 1954 

CmMPB 18657 1862 1864 1873 

com 1038 1210 

DEC 206 365 438 677 792 1064 1266 1264 1301 1305 1678 1924 

EMT 230 237 249 255 261 271 280 265 294 301 313 319 325 338 348 
446 9860 1015 1068 1080 1069 1096 1109 1226 1256 1398 1464 1541 1607 1704 
1607 18631 1848 1896 1947 1959 2001 

HALT 34 232 4117 1126 1133 1237 1408 1543 1603 1653 1840 2009 2016 


Inc 475 504 $47 $97 600 636 639 6860 668 716 727 614 ee4 986 1039 





MAINDEC*11°DZRFBoB 
DZRFBB,P1i1 
1161 1211 
IoT 862 673 
JMP 46 55 
110 114 
1706 1613 
JSR 216 233 
386 411 
737 745 
925 937 
1218 1222 
1609 1631 
1663 1665 
MOV 203 204 
368 369 
426 428 
500 $01 
578 584 
664 669 
728 729 
779 781 
830 64a 
918 919 
954 961 
1062 1070 
1209 1212 
1351 1352 
1482 1466 
1528 1539 
1636 1642 
1712 1716 
1784 1762 
1942 1962 
2012 2013 
MOVB 1656 18670 
NOP 1021 1022 
RESET 202 1663 
ROL 243 244 
1165 1166 
ROR 341 342 
1772 1921 
RTI 1044 1057 
RTS 1148 1172 
1992 2024 
SuB 242 264 
SWAB 1103 1775 
SxT 1522 
TRAP 29 30 
TST 217 228 
785 798 
TSTB 378 404 
1194 1532 
WAIT 865 876 
ASCII 2044 2048 
2122 2127 


1355 
868 
61 
118 


251 
440 
754 
955 
1231 
1644 
2014 
208 
374 
429 
502 
ses 
670 
735 
787 
049 
921 
1002 
1074 
1214 
1366 
1489 
1560 
1652 
1720 
1847 
1979 
2019 
1879 
1023 
1734 
268 
1167 
1008 
1922 
1128 
1217 


1370 
943 
65 
122 


257 
442 
769 
963 
1252 
1657 


209 
382 
430 
$03 
611 
674 
736 
766 
651 
922 
1006 
1083 
1250 
1367 
1490 
1565 
1655 
1724 
1853 
1980 


1735 

269 
1168 
1150 
1923 
1137 
1238 


1452 


RF1i DATA TEST REPLACES DSOA 
CROSS REFERENCE TABLE 


1534 
959 
71 
352 


273 
516 
810 
9668 
1374 
1702 


215 
384 
437 
514 
618 
699 
743 
7194 
653 
924 
1030 
1102 
1261 
1382 
1504 
1567 
1661 
1733 
1875 
1962 


278 
1263 
1152 
1951 
1540 
1307 


1485 


1664 
i571 
74 
476 


262 
534 
822 
972 
1378 
1799 


241 
398 
439 
$15 
619 
700 
744 
800 
858 
928 
1031 
1114 
1262 
13867 
1508 
1573 
16786 
1740 
1990 
1963 


1666 
1567 
77 
479 


287 
543 
631 
976 
1383 
1803 


267 
399 
441 
$19 
625 
701 
751 
601 
864 
929 
1032 
1136 
1265 
1392 
1510 
1883 
1679 
1741 
1892 
1984 
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>) 
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OZRFBB,P11 
2194 
eENABL 7 
e END 2248 
eEVEN 143 
LIST 5 
eNLIST 5 
eREPT 34 
TITLE a 


ERRORS DETECTED: 


RF11 DATA TEST REPLACES DSOA 


CROSS REFERENCE TABLE 


2198 2204 2208 2213 2217 


1318 2043 2239 
34 
34 


MACY11,624 


2224 


6-SEP-73 
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2229 


2231 


17 
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#DZRFBB,OZRFBB/SOL/CRF.DZRFBB 
RUNeTIMEs 6 14 3 SECONDS 
CORE USED: 6K 


